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.REM 



IDENTIFICATION 



PRODUCT CODE: 
PRODUCT NAME: 
DATE: 

MAINTAINER: 
AUTHOR : 



AC-F6098-MC 

CKKTABO 11/44 MEM MGMT PRT A 
APRIL, 1981 

DIAGNOSTIC ENGINEERING 
DAN P. MILLEVILLE 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WIIHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT W APPEAR IN THIS 
DOCUMENT. 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1979, 1981 BY DIGITAL EQUIPMENT CORPORATION 
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DATE 

OCTOBER. 1979 
APRIL. 1981 



PROGRAM HISTORY 



REVISION 

A 
B 



REASON FOR REVISION 
FIRST RELEASE 

CORRECT TRACE TRAP COMMENTS. USE NEW SYSMAC 
CONTAINING CHECK FOR BIT 0 OF CPU ERROR REGIS- 
TER AND "Q CHECK IN INPUT ROUTINE. 
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88 1.0 PROGRAM INFORMATICS 

g9 

90 

91 1.1 ABSTRACT 

92 

93 

94 THIS PROGRAM WAS DESIGNED USING A 'BOTTOM UP APPROACH 

95 STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 

96 LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 

97 THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 

93 BY DEDUCTION. THE FAILURE CAN BE ISOLATED TO A SMALL 
99 SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 

100 

101 PART A BEGINS BY TESTING SOME OF THE INTERNAL CPU DATA 

102 AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, THEN 

103 WORKS OUTWARD THROUGH THE MEMORY MANAGEMENT REGISTERS. 

104 AFTER THE REGISTERS ARE FOUND TO BE USEABLE. RELOCATION 

105 (CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 

106 AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED. PART B 

107 BEGINS BY TESTING THE ABORT AND STATUS SEGMENTS OF LOGIC. 

108 PART B THEN CHECKS THE SPECIAL ABORT SEQUENCES. THE MFPI/MTPI 

109 INSTRUCTIONS AND THE CSM INSTRUCTION. 
110 

111 1.2 REQUIREMENTS 

112 

113 

114 A PDP 11/44 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 

115 AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 

116 UNLESS THE PROGRAM IS RUMyiING UNDER APT OR ACT IN WHICH 

117 CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 
118 

119 1.3 RELATED DOCUMENTS AND STANDARDS 

120 

121 

122 1. ACT11/XXDP PROGRAMMING SPECIFICATION 

123 2. STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 

124 3. DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 

125 4. POPII MAINOEC SYSMAC PACKAGE 

126 5. XXDP USER'S MANUAL 
127 

128 1.4 PRELIMINARY PROGRAMS 

129 

130 

131 BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN. THE 

132 FOLLOWING DIAGNOSTICS SHOULD BE RUN: 
133 

134 CKKAABO 1/44 CPU/EIS 

135 CKKABCO 11/44 TRAPS 
136 

137 ALSO. THE MAIN MEMORY DIAGNOSTIC (CZMSD) SHOULD BE RUN TO SCAN 

138 AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM CAN BE EXECUTED. 
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139 

UO 2.0 OPERATING INSTRUCTIONS 

141 

142 

143 2.1 LOADING PROCEDURES 

144 

145 

146 THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 

U7 REFER TO THE XXDP USER'S MANUAL FOR FURTHER INFORMATION. 

148 FOR USE WITH ACT OR APT, REFER TO THEIR RESPECTIVE 

149 DOClilEN-TS. THE PROGRAM CAN ALSO BE DIRECTLY LOADED 

150 USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 
151 

152 2.2 STARTING PROCEDURES 

153 

154 

155 THE PROGRAM IS SMARTED BY LOADING ADDRESS 200 AND 

156 STARTING. THE SWITCH REGISTER SHOULD BE SET ACCORDING TO 

157 SECTION 2.3 BEFORE THE PROGRAM IS STARTED. HOWEVER, IF 

158 DESIRED, THE PROGRAM WILL USE THE SOFTWARE SWITCH REGISTER 

159 AT LOCATION 176 (LOCATION 174 WILL BE USED AS THE SOFTWARE 

160 DISPLAY REGISTER). IN THAT CASE, THE PROGRAM WILL ASK FOR 

161 THE INITIAL SWITCH REGISTER VALUE BY TYPING "SWR= XXXXXX 

162 NEW= " AFTER TYPING THE NAME OF THE PROGRAM (XXXXXX = 

163 THE OCTAL CONTENTS OF LOCATION 176). (SEE SECTION 2.4) 
164 

165 ALSO THE PROGRAM CAN BE MADE TO USE THE SOFTWARE SWITCH 

166 REG. EVEN IF THE CONSOLE SWITCH REG. IS PRESENT BY LOADING 

167 "Mini" INTO THE CONSOLE SWITCH REG. BEFORE STARTING 

168 THE PROGRAM. 
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169 

170 2.3 CONTROL SWITCH SETTINGS 

171 

172 

173 SWITCH OCTAL VALUE USE 

174 

175 SU15 100000 HALT ON ERROR 

176 THIS SWITCH WHEN SET WILL HAL^ 

177 THE PROCESSOR WHEN AN ERROR IS 

178 DETECTED AFTER THE ERROR MESSAGE 

179 HAS BEEN TYPED. PRESSING CONTINUE 

180 WILL RESUME TESTING (SEE SECTION 

181 3.1 ABOUT LOADING THE SWITCH REG 

182 BEFORE CONTINUING). 
183 

184 SW14 040000 LOOP ON TEST 

185 THIS SWITCH WHEN SET WILL 

186 CAUSE THE PROGRAM TO LOOP ON 

187 THE CURRENT SUBTEST. 
188 

189 SW13 020000 INHIBIT ERROR TYPEOUTS 

190 THIS SWITCH WHEN SET WiLL 

191 INHIBIT THE TYPING OF ERROR 

192 MESSAGES. 
193 

194 SW12 010000 INHIBIT TRACE TRAP 

195 THIS SWITCH WHEN SET WILL 

196 INHIBIT T-eiT TRAPPING WHICH 

197 NORMALLY TAKES PLACE DURING 

198 EVERY ODD PASS STARTING 

199 WITH THE THIRD PASS. 
200 

201 SW10 002000 BELL ON ERROR 

202 THIS SWITCH WHEN SET WILL RING 

203 THE CONSOLE TERMINAL BELL WHEN 

204 AN ERROR HAS BEEN DETECTED. 
205 

206 SW9 001000 LOOP ON ERROR 

207 THIS SWITCH WHEN SET WILL 

208 CAUSE THE PROGRAM TO LOOP ON THE 

209 FIRST FAILURE WHICH IS ENCOUNTERED 

210 EVEN IF THE FAILURE IS INTERMITTANT 
211 

212 SW8 000400 LOOP ON TEST IN SWR<7:0> 

213 THIS SWITCH WHEN SET WILL 

214 CAUSE THE PROGRAM TO LOOP ON THE 

215 TEST WHOSE TEST NUMBER IS SET 

216 IN BITS 7-0 OF THE SWITCH REG. 
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217 

218 

219 

220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 

259 

260 

261 

262 

263 

264 

265 

266 



2.4 



2.5 



LOADING THE SWITCH REGISTER 



THE CONSOLE SWITCH REGISTER PROVIDED IS LOADED DIRECTLY FROM 



THE CONSOLE BY TYPING A CONTROL P (*P). 
PROMPT IS RECIEVED, TYPE 'D SW XXXXXX". 
INTENDED VALUE OF THE SWITCH REGISTER. 



CONSOLE SWITCH REG. 
IS RUNNING OR NOT. 



THEN WHEN THE CONSOLE 
WHERE '^XXXXX" IS THE 
THE VALUE OF THE 



CAN BE CHANGED ANY TIME WHETHER THE PROGRAM 



TO LOAD THE SOFTWARE SWITCH REG. WHILE THE PROGRAM IS 
RUNNING, A CONTROL G (*G) SHOULD BE TYPED ON THE CONSOLE 
TERMINAL. (THE "SCOPE" AND "ERROR" ROUTINES CHECK TO SEE 
IF A *G HAS BEEN TYPED.) THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 

IN RESPONSE TO A ''G OR AT THE BEGINNING OF THE PROGRAM, THE 
PROGRAM WILL TYPE: 



SWR = XXXXXX NEW = 



176. 



•c 



WHERE "XXXXXX" IS THE CURRENT OCTAL CONTENTS OF LOC. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 
CARRIAGE RETURN WHICH WILL BE LOADED 
AS THE NEW VALUE FOR THE SWITCH REG. 
<CR> JUST A <CR>. LEAVES THE SWITCH REG. 
AS IT IS. 

XXX*U A CONTROL-U <*U) WILL CAUSE ALL OF THE ' 
DIGITS TYPED SO FAR TO BE IGNORED. 
WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 
TEST AND PASS Nl/BERS, REQUEST A NEW VALUE 
FOR THE SWITCH REG., AND JUMP TO THE END- 
OF-PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 
TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 

ABOVE OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 
TO TYPE A •7<CRLF>" AND REACT AS THOUGH A 
*U HAD BEEN TYPED. 

NOTE: RECOGNITION OF A *G MAY BE HAMPERED BY 

EXECUTION OF A COUPLE 'T^ESET" INSTRUCTIONS 

WITHIN THE PROGRAM. 



EXECUTION TIMES 



THE RUN TIME FOR A SINGLE PASS WITH TRACE TRAPPING 
ENABLED IS APPROXIMATELY 8 SECONDS WITH CACHE. 
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267 

268 3.0 ERROR INFORnATIOM 

269 

270 

271 3.1 ERROR REPORTING PROCEDURES 

272 

274 If AN ERROR IS DETECTED. THE PROGRAM WILL TRAP TO THE 

275 ERROR HANDLING ROUTINE (SERROR) . THE VALUE OF BITS 

276 15.13,10, AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 

277 IN REPORTING AN ERROR (SEE SECTION 2.3). THE 

278 ERROR INFORMATION WILL BE TYPED UNLESS SU13 = 1. 
279 

280 IF SU15 = 1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 

281 REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 

282 ARE TO BE CHANGED. A "6 SHOULD BE TYPED BEFORE PRESSING 

283 "CONTINUE" TO RESUME TESTING. 
284 

285 IF SW9 = 1 (LOOP ON ERROR), THE PROGRAM WILL GO TO THE 

286 ADDRESS CONTAINED IN LOCATION '5LPERR". AFTER REPORTING 

287 THE ERROR. "SLPERR" IS SET Br EACH "SCOPE" CALL AND IS 

288 SET DIRECTLY DURING SOME SLBTESTS TO PROVIDE THE SMALLEST 

289 LOOP FOR LOOPING ON ERROR. IF SW9 = 0. THE PROGRAM WILL 

290 RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 

291 (SEE SECTION 5.3 FOR MORE ON "lOOP ON ERROR"). 
292 

293 3.2 INTERPRETING ERROR REPORTS 

294 

295 

296 EVERY ERROR REPORT TYPES THE NUMBER OF THE TEST IN WHICH 

297 THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF THE 

298 ERROR CALL (ERRORPC). THESE TWO VALUES PINPOINT THE 

299 PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 

300 TO THE PROGRAM LISTING. THE OPERATOR CAN THEN READ THE 

301 COf'lENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 

302 A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 

303 WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 

304 AND FUNCTIONS BEING TESTED. 
305 

306 EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 

307 GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 

308 BEEN DETECTED. 
309 

310 BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 

311 THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 

312 LOGIC WAS BEING TESTED, THE OPERATOR CAN THEN REFER 

313 TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 

314 CAUSE FOR THE FAILURE. 



V 
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315 

316 3.3 SAMPLE ERROR REPORT 

317 

318 

319 BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 

320 OCCURRED DURING EXECUTION OF THE PROGRAM: 
321 

322 MEM. MGMT. REG. BITS NOT SET CORRECTLY 

323 REGISTR WROTE READ READ- (BINARY) 

324 ADDRESS (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC 

325 177572 040000 060000 0110000000000000 000012 022060 

327 WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOCATION 

328 022060. THE "REGISTER ADDRESS" TELLS US THAT WE WERE 

329 TESTING MEMORY MANAGEMENT'S STATUS RGiSTER 0 (SRO). 

330 IN THE LISTING. THE TEST DESCRIPTION SAYS THAT THE 

331 ERROR BITS (BITS <15:13» OF SRO WERE BEING SET AND 

332 CLEARED INDIVIDUALLY. THE ERROR REPORT SAYS WE TRIED 

333 TO SET BIT 14 BY WRITING '1040000" TO SRO BUT WHEN WE 

334 READ IT BACK WE READ •T)60000". IT APPEARS THAT BIT 13 IS 

335 STUCK AT "1" OR IT IS GETTING SET WHEN BIT 14 IS SET 

336 TO 'T". ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 

337 TELL US WHICH IS THE CASE. 
338 

339 3.4 POWER MONITOR BIT ERRORS 

340 

341 

342 THE NEW SERROR AND SSCOPE ROUTINES USED CONTAIN A CHECK OF BIT 0 (POWER 

343 MONITOR BIT) OF THE CPU ERROR REGISTER. IF THE BIT SHOULD BECOME SET. 

344 AN ERROR CALL WILL BE CALLED FROM THE $SCOPE ROUTINE. THE TEST NUMBER 

345 IN THE ERROR PRINTOUT WILL BE THE TEST •BEFORE* THE SCOPE CALL THE SET 

346 BIT WAS FOUND. IF THE BIT BECOMES SET AFTER THE SCOPE AND DURING THE 

347 TEST, AND AN ERROR SHOULD BE CALLED FOR WHATEVER REASON, *TWO* ERRORS 

348 WILL BE CALLED. THE FIRST ERROR WILL BE THE POWER MONITOR BIT ERROR. 

349 AND THE SECOND WILL BE THE ERROR ORIGINALLY CALLED. THE ERROR WAS 

350 CALLED, LOOP-ON-ERROR IS DISABLED FOR THIS ERROR ONLY. IF THIS ERROR 

351 SHOULD APPEAR, IT IS SUGGESTED THAT THE PROBLEM CAUSING THE BIT TO BE 

352 SET BE CORRECTED BEFORE USING THE RESULTS OF THIS DIAGNOSTIC AS 

353 CONCLUSIVE. 
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354 4.0 MISCEL LANEOUS INFORMATION 

356 

357 4.1 ACT/APT/XXDP COMPATABILITY 
359 

360 THE PROGRAM IS FI'LLY ACT AND APT COMPATABLE 

361 AND IS SUPPORTED UN')ER THE XXDP PACKAGE. 
362 

363 4.2 END-OF-PASS MESSAGE 

364 

365 

366 AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 

367 IS PRINTED. FOR EXAMPLE: 
368 

369 END OF PASS M2 
370 

371 THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 

372 AND NO ERRORS WERE DETECTED DURING THAT PASS. 
373 

374 TOTAL Nl/«ER OF ERRORS SINCE THE LAST END-OF-PASS ARE 

375 REPORTED ONLY IF THERE ARE ANY IN THE END-OF-PASS MESSAGE 

376 AS FOLLOWS: 
377 

378 END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 2 
379 

380 THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 

381 WITH TWO ERRORS DETECTED DURING THAT PASS. BOTH THE 

382 PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 
383 

384 4.3 T-6IT TRAPPING 

385 

386 

387 THE 'T-eir* (BIT 4) IN THE PROCESSOR STATUS WORD IS SET 

388 BY AN 'TRTI" IN THE END-OF-PASS ROUTINE FOR EVERY OTHER PASS 

389 BEGINNING WITH THE THIRD PASS (PASSES 3,5.7.9...). T-6IT 

390 TRAPPING CAN BE INHIBITED BY SETTING BIT 12 = 1 IN THE SWITCH 

391 REGISTER (SEE SECTION 2.4). 
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392 

393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 



4.4 POWER FAILURE HANDLING 



IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP) . THE 
MESSAGE 'POWER FAILURE-RESTARTING" IS TYPED OUT AND 
THE PROGRAM WILL RESTART EXECUTION AT "START:" (THE 
VERY BEGINNING OF THE PROGRAM. IF THE SOFTWARE 
SWITCH REGISTER IS BEING USED. ITS CONTENTS WILI BE 
RESTORED. 

4.5 PHYSICAL BUS ADDRESS CONSTRUCTION 



BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 



12 11 10 09 08 07 06 05 04 03 02 01 00 
/ 0 1 1 1 1 1 1/ 1 1 1 1 1 0/ VBA* 

















(ADDED TO) 








15 14 


13 


12 


11 


10 


09 


08 


07 06 05 04 03 


02 


01 


00 I 


/ 0 1 


0 


1 


0 


0 


0 


1 


0 10 0 0 


0 


0 


1/ I 


1 I 
I I 



PAR* 



V V 
21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 

/0_1010^01 100000_001 1 1 1 1 0/PBA 

*= VBA BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 
**= PSW MODE BITS <15:14> SELECTS THE USER (=11), SUPERVISOR 
(=01) OR KERNEL (=00) SET OF PAR'S/PDR'S 
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434 

435 S.O PROGRAM DESCRIP1I0N 

436 

437 

438 5.1 SUBROUTINES USED BY THIS PROGRAM 



440 

441 FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 

442 BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE "SYSMAC 

443 PACICAGE". DETAILS OF THE SUBROUTINES UNIQUE TO THIS 

444 PROGRAM MAY BE FOUND IN THE PROGRAM LISTING. REFER TO 

445 THE "SYSMAC" DOCUMENT AND PROGRAM LISTING FOR THE OTHER 

446 ROUTINES. 
447 

448 1. TURN OFF T-BIT AND SAVE CURRENT PSW 

449 2. TURN ON T-BIT AND RESTORE PREVIOUS PSW 

450 3. SET ALL WRITEABLE BITS IN ALL PAR/PDR'S 

451 « 4. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 

452 

453 NOTE ALSO THAT THE MACRO LIBRARY USED TO ASSEMBLE THIS PROGRAM 

454 HAS OTHER SPECIAL ROUTINES APPENDED TO THE SYSMAC MACRO PACKAGE: 

455 THIS LIBRARY MUST BE USED TO ASSEMBLE EITHER PART A OR PART B 

456 CORRECTLY. 

457 

458 5.2 PROGRAM LISTING 



FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 
PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 
"CODING COMMENTS". 
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465 5.3 USJNG THE PROGRAM TO DIAGNOSE A FAULT 

466 

468 WHEN AN ERROR OCCURS. ONE OF THE THINGS THAT'S IMPORTANT 

469 TO NOTE. IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 

470 NLfBER IS ODD AND IS THREE OR GREATER, THE ERROR MIGHT BE 

471 T-eiT SENSITIVE. TRY RUNNING THE PROGRAM AGAIN WITH BIT 

472 12 OF THE SWITCH REG. EQUAL TO 'T* TO INHIBIT T-BIT 

473 TRAPPING. THIS SHOULD HELP YOU DETERMINE WHAT MAKES THE 

474 MACHINE FAIL AND WHEN. 
475 

476 IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 

477 REG. EQUAL TO 'X)", THEN YOU ARE ABLE TO LOOK AT ALL 

478 THE ERRORS THAT HAY BE RELATED TO THE FAULT YOU ARE 

479 DIAGNOSING. A FAULT IN AN EARLIER TEST MAY RESULT IN 

480 ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 

481 CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 

482 OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 

483 MUCH INFORMATION AS POSSIBLE. 
484 

485 NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE, 

486 YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 

487 OF THE SWITCH REG. EQUAL TO 'T' TO LOOP ON THE ERROR. 

488 FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 

489 REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 

490 IN THE PROGRAM LISTING). 

491 ' 

492 OR YOU COULD LOOP ON THE TEST BY EITHER SETTING BIT 14 

493 OF THE SWITCH REG. EQUAL TO 'T" OF BY SETTING BIT 08 OF THE 

494 SWITCH REG. EQUAL TO 'T' AND THEN SETTING THE TEST NUMBER 

495 IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 

496 INHIBIT ERROR TYPEOUTS BY SETTING BIT 13 OF THE SWITCH REG. 

497 EQUAL TO *T'. 

498 a 
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1196 
1197 



1198 



1199 



001100 
104000 
OOOOOA 

000011 
000012 
000015 
000200 
177776 
1 7777 t 
\7777l, 
y77772 
M757Q 
-^7757^ 

000000 
000001 
000002 
000003 
OOOOOA 
000005 
000006 
000007 
000006 
000007 

000000 
000040 
000100 
000140 
000200 
000240 
000300 
000340 



TITLE CKKTABO 11/44 MEM MGMT PRT A 
•COPYRIGHT (C) 1981 
•DIGITAL EQUIPMENT CORP. 
•MAYNARD. MASS. 01754 



•THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
•PACKAGE (MAINDEC-11-DZQAC-C5), JAN, 1981. 



S8TTL 
* 

■» 


OPERATIONAL 
SWITCH 


SWITCH SETTINGS 

USE 


* 
* 


15 


HALT ON ERROR 


* 


14 


LOOP ON TEST 


* 


13 


IfWIBIT ERROR TYPEOUTS 


* 


12 


INHIBIT TRACE TRAP 


* 


10 


BELL ON ERROR 


* 


9 


LOOP ON ERROR 


* 


8 


LOOP ON TEST IN SWR<7:0> 



S8TTL BASIC DEFINITIONS 

•INITIAL ADDRESS OF THE STACK POINTER 1100 *** 
STACK= 1100 

ERROR=EMT 
SCOPE=IOT 
.••MISCELLANEOUS DEFINITIONS 



HT= 11 
LF= 12 
CR= 15 
CRLF= 200 
PS= 177776 
PSW=PS 
STKLMT= 177774 
PIRQs \77772 
DSWR= 177570 
DD I SP= 177570 



.•GENERAL PURPOSE REGISTER DEFINITIONS 



.-CODE FOR HORIZONTAL TAB 
;COOE FOR LINE FEED 
.-CODE FOR CARRIAGE RETURN 
.-CODE FOR CARRIAGE RETURN-LINE FEC^ 
.•PROCESSOR STATUS WORD 

.•STACK LIMIT REGISTER 
; PROGRAM INTERRUPT REQUEST REGISTER 
.-HARDWARE SWITCH REGISTER 
; HARDWARE DISPLAY REGISTER 



R0= 
R1 = 
R2= 
R3= 
R4= 
R5= 
R6= 
R7= 
SP= 
PC= 



to 

XI 
Z2 
Xl 
X4 
X5 
X6 
X7 
X6 
X7 



.••PRIORITY LEVEL DEFINITIONS 



.GENERAL REGISTER 
.•GENERAL REGISTER 
.GENERAL REGISTER 
.•GENERAL REGISTER 
; GENERAL REGISTER 
; GENERAL REGISTER 
.GENERAL REGISTER 
; GENERAL REGISTER 
; STACK POINTER 
.-PROGRAM COUNTER 



PRO= 
PR1 = 
PR2= 
PR3= 
PR4= 
PR5- 
PR6= 
PR7= 



0 
40 
100 
140 
200 
240 
300 
340 



.PRIORITY LEVEL 0 

.•PRIORITY LEVEL 1 

.•PRIORITY LEVEL " 

;PRI0RITY LEVEL 

;PRI0RITY LEVEL 

.•PRIORITY LEVEL 

; PRIORITY LEVEL 

.-PRIORITY LEVEL 



CKKTABO 11 /4A MEM MGMT 
BASIC DEFINITIONS 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

000004 
000010 
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C 2 
15-1 



(BITOO TO BIT15) 



.••■•SWITCH REGISTER" SWITCH DEFINITIONS 

SW15= 100000 

SW14= 40000 

SW13= 20000 

SW12= 10000 

SW11= 4000 

SW10= 2000 

SW09= 1000 

SW08= 400 

SW07= 200 

SW06= 100 

SW05= 40 

SW04= 20 

SW03= 10 

SW02= 4 

SW01= 2 

SWOO= 1 

SW9=SW09 

SW8=SW08 

SW7=SW07 

SW6=SW06 

SW5=SW05 

SW4=SW04 

SW3=SW03 

SU2=SW02 

SW1=SW01 

SWO=SWOO 
.-•DATA BJT DEFINITIONS 
BIT15= 100000 
BIT14= 40000 
BIT 13= 20000 
BIT12= 10000 
BIT11= 4000 
BIT10= 2000 
BIT09= 1000 
BIT08= 400 
BJT07= 200 
BIT06= 100 
BIT05= 40 
BIT04= 20 
BIT03= 10 
BIT02= 4 
BJT01= 2 
BIT00= 1 

BJT9=8IT09 

BIT8=8I T08 

B1T7=8IT07 

BIT6=8IT06 

BIT5=8IT05 

BIT4=8IT04 

BIT3=8IT03 

BIT2=8IT02 

BIT1=8IT01 

BIT0=8JT00 
.••BASIC "CPU" TRAP 
ERRVEC= 4 
RESVEC= 10 



VECTOR ADDRESSES 

.-.TIME OUT AND OTHER ERRORS 
; .-RESERVED AND ILLEGAL INSTRUCTIONS 



CKKTABO 11/44 MEM MGMT PRT A 
BASIC DEFINITIONS 

OOOOK 
000014 
000014 
000020 
000024 
000030 
000034 
000060 
000064 
000240 
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15-2 



SEQUENCE 16 



1200 



000250 

177572 
177574 

177576 
172516 

177600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 

177620 
177622 
177624 
177626 
177630 
177632 
177634 
177636 

177640 
177642 
177644 
177646 
177650 
177652 
177654 
177656 

177660 
177662 
177664 
177666 
1 77670 
177672 
177674 
177676 

172200 
^72202 



T8ITVEC=14 



TRTVEC= 
BPTVEC= 
I0TVEC= 
PWRVEC= 
EMTVEC= 
TRAPVEC=34 
TKVEC= 60 
TPVEC= 64 
PIRQVEC=240 



14 
14 
20 
24 
30 



MEMORY MANAGEMENT 
VECTOR ADDRESS 
250 

STATUS REGISTER ADDRESSES 
177572 
177574 
177576 
172516 
•J" PAGE 
177600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 



.S8TTL 
;*tCT11 
MMVEC= 
.•♦KT11 
SRO= 
SR1 = 
SR2= 
SR3= 
;*USER 
UIPDRO= 
UIPDR1= 
UIPDR2= 
UIPDR3= 
UIPDR4= 
UIPDR5= 
UIPDR6= 
UIP0R7= 
;*USER 'D" PAGE 
UDPDRO= 177620 



•7" BIT 
TRACE TRAP 

BREAKPOINT TRAP (BPT) 
INPUT/OUTPUT TRAP (lOT) ••SCOPE** 
POWER FAIL 

EMULATOR TRAP (EMT) •*ERROR** 
'7RAP" TRAP 
TTr KEYBOARD VECTOR 
TTY PRINTER VECTOR 
PROGRAM INTERRUPT REQUEST VECTOR 
DEFINITIONS 



DESCRIPTOR REGISTERS 



DESCRIPTOR REGISTORS 



UDPDR1= 
UDPDR2= 
U0PDR3= 
UDPDR4= 
UDPDR5= 
UDPDR6= 
UDPDR7= 
.••USER ' 
UJPARO= 
UIPAR1= 
UIPAR2= 
UIPAR3= 
UIPAR4= 
UIPAR5= 
UIPAR6= 



'i77622 
177624 
177626 
177630 
177632 
177634 
177636 
'J" PAGE 
177640 
M7(ik2 
'[77hU{, 
\77(ik(i 
177650 
177652 
177654 
177656 



ADDRESS REGISTERS 



. ♦USER '!>•• PAGE 
UDPARO= 177660 



ADDRESS REGISTERS 



UDPAR1= 
UDPAR2= 
UDPAR3= 
UDPAR4= 
UDPAR5= 
UDPAR6= 
UDPAR7: 



177662 
177664 
177666 
177670 
177672 
177674 
177676 



•SUPERVISOR "V 
SIPDR0= 172200 
SIPDR1= 172202 



PAGE DESCRIPTOR REGISTERS 



CtCKTABO MEM MGMT PRF A 

MEMORY MANAGEMENT DEFINITIONS 

1 72204 
172206 
172210 
172212 

172216 

172220 
^72222 
M222i^ 
M222b 
}72210 
^722Z2 
1 72234 
172236 

1 72240 
172242 
172244 
1 72246 
1 72250 
172252 
172254 
172256 

172260 
172262 
172264 
172266 

172270 
1 72272 
172274 
172276 

172300 
172302 
172304 
1 72306 
172310 
172312 
172314 
172316 

172320 
172322 
172324 
172326 
172330 
172332 
172334 
172336 

172340 
172342 
172344 
172346 
172350 
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15-3 



SEQUENCE 



SIP0R2= 
SIP0R3= 
SIPDR4= 
SIPDR5= 
SIPDR6= 
SIPDR7= 



172204 
172206 
172210 
172212 
172214 
172216 



•SUPERVISOR 'V 
SDPDRO= 172220 



PAGE DESCRIPTOR REGISTERS 



SDPDR1= 
SDPDR2= 
SDPDR3= 
SDPDR4= 
SDPDR5= 
SDPDR6= 
SDPDR7= 



^72222 
^7222U 
y72226 
m250 
}72232 
172234 
172236 



•SUPERVISOR "I' 
SIPARO= 172240 



PAGE ADDRESS REGISTERS 



SIPAR1= 
SIPAR2= 
SIPAR3= 
SIPAR4= 
SIPAR5= 
SIPAR6= 
SIPAR7= 



172242 
172244 
172246 
172250 
172252 
172254 
172256 



.-•SUPERVISOR 'V 
SDPARO= 172260 



PAGE ADDRESS REGISTERS 



SDPAR1= 
SDPAR2= 
SDPAR3= 
SDPAR4= 
SDPAR5= 
SDPAR6= 
SDPAR7= 
; *KERN£L 
KIPDRO= 
KIPDR1= 
KIPDR2= 
KIPDR3= 
KIPDR4= 
KIPDR5= 
KIPDR6= 
KIPDR7= 
; *KERNEL 
KDPDRO= 
KDPDR1= 
KDPDR2= 
KDPDR3= 
KDPDR4= 
KDPDR5= 
KDPDR6= 
KDPDR7= 
; *KERNEL 
KIPARO= 
KIPAR1= 
KIPAR2= 
KIPAR3= 
KIPAR4= 



172262 
172264 
172266 
172270 
■\72272 
U227^ 
y7227ti 
"I" PAGE 
172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 
■D" PAGE 
172320 
y72Z22 
U252i* 
172326 
172330 
172332 
172334 
172336 

i" PAGE 
172340 
^723^2 
1 72344 
172346 
172350 



DESCRIPTOR REGISTERS 



DESCRIPTOR REGISTERS 



ADDRESS REGISTERS 



CKKTABO MEM M»1T PRT A 

MEMORY MANAGEMENT DEFINITIONS 

172352 
1 72354 
172356 

172360 
172362 
17236A 
172366 
1 72370 
172372 
172374 
172376 



1201 
1202 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
12K 
1215 
1216 
1271 
1273 



177572 
177574 
1 77576 
172516 
000006 
000006 
000006 
000020 
000100 
001100 
000700 
000600 
177766 
177770 



000000 



1274 



000174 
0001 74 000000 
000176 000000 

000200 000137 020000 



1275 



000204 
000046 
000046 032742 
000052 
000052 000000 
000204 



000204 
000024 

000024 000200 
000044 

000044 000204 



F 2 
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KIPAR5= 172352 
KIPAR6= 172354 
KIPAR7= 172356 

.♦KERNEL "t>" PAGE ADDRESS REGISTERS 

KDPARO= 172360 

KDPAR1= 172362 

KDPAR2= 172364 

KDPAR3= 172366 

KDPAR4= 172370 

KDPAR5= 172372 

KDPAR6= 172374 

KDPAR7= 172376 

.•♦ADDITIONAL DEFINITIONS 

• * 

MMR0=SR0 

MMR1=SR1 

MMR2=SR2 

MMR3=SR3 

KSP=SP 

SSP=SP 

USP=SP 

T8IT=8IT4 

UBIT=8IT6 
KERSTK=STACK 
SUPSTK=STACK-200 
USESTK=STACK-300 
CPUERR=1 77766 
RMIREG=1 77770 

.S8TTL TRAP CATCHER 
.=0 

;*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A ".♦2,HALT" 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
.•♦LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.=174 

DISPREG: .WORD 0 .-.SOFTWARE DISPLAY REGISTER 

SWREG: .WORD 0 ;; SOFTWARE SWITCH REGISTER 

.SBTTL STARTING ADDRESS(ES) 

JMP a#START .-.JUMP TO STARTING ADDRESS OF PROGRAM 
S8TTL ACTll HOOKS 

HOOKS REQUIRED BY ACTll 

$SVPC=. .-SAVE PC 

.=46 
SENDAD 
.=52 

.WORD 0 
.=$SVPC 
. SBTTL APT PARAMETER BLOCK 

• • •»»*»»»»»•»»»»*•»»•»»**••••••••••*••*»•••«*****•**»****•*••*••* 

:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



SEQUENCE 18 



;;1)SET L0C.46 TO ADDRESS OF $ENDAD JN .$EOP 

;;2)SET LOC.52 TO ZERO 
;; RESTORE PC 



.$X=. 

.=24 
200 
.=44 
SAPTHDR 



SAVE CURRENT LOCATION 

SET POWER FAIL TO POINT TO START OF PROGRAM 
FOR APT START UP 

POINT TO APT INDIRECT ADDRESS PNTR. 
POINT TO APT HEADER BLOCK 



fKKTABO n/4A MEM MGM^ PRT A 
APT PARAMETER BLOCK 

00020A 



6 2 
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SEOUEWCE 



19 



00020A 




SAPTHD: 






00020A 


000000 


$HI8TS: 


.WORD 


0 


000206 


001 22A 


$MBAOR: 


.WORD 


$MAIL 


000210 


000010 


STSTM: 


.UORO 


10 


000212 


000020 


SPASTM: 


.WORD 


20 


0002U 


000005 


SUNITM: 


.WORD 


5 


000216 


OOOOU 




.WORD 


SETEND 



. = .SX ;;RESET LOCATION COUfJTER 

SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
INTERFACE SPEC. 

;:TW0 HIGH BITS OF 18 BIT MAILBOX ADDR. 
;ADDRESS OF APT MAILBOX (BITS 0-15) 
;RUN TIM OF LONGEST TEST 

;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
.ADDITICmL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
$ETEND-$MAIL/2 ;;LEN6TH MAIL80X-ETABLE (WORDS) 



CKKTABO 11/<>A MEM nGHT PRT A 
COmON TAGS 

1276 
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.SBTTL COMMON TAGS 



H 

PAGE 16 



SEQUENCE 



001100 
001100 
001102 
001103 
00110A 
001106 
001110 
001112 
0011K 
001115 
001116 
001120 
001122 
001124 
001126 
001130 
001132 
001134 
001135 
001136 
001 140 
001142 
001144 
001146 
001150 
001152 
001154 
001155 
001156 
001157 
001160 



001100 

000000 
000 
000 
000000 
000000 
000000 

oooooo 

000 
001 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

000 
000 

oooooo 

177570 
177570 
177560 
177562 
177564 
177566 
000 
002 
012 
000 
OOOOOO 



••******•*•***•*•*•*****************••*********••**•***•*•••**»•* 

;iTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
.••USED IN THE PROGRAM. 



SCMTAG: 

STSTNM: 

SERFLG: 

SICNT: 

SLPADR 

SLPERR 

SERTTL 

SITEMB 

SERMAX 

SERRPC 

$GDADR 

SBDADR 

SGDDAT 

SaDDAT 



SAUTOe." 
SINTAG: 

SWR: 

DISPLAY 

$TKS: 

$TKB. 

$TPS: 

$TPB; 

SNULL: 

SFILLS 

SFILLC 

fTPFLG 

SREGAD 



.=1100 

.UORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.BYTE 
.BYTE 
.WORD 
.WORD 
; .WORD 
177560 
177562 
177564 
177566 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.WORD 



0 
0 
0 
0 
0 
0 
0 
0 

1 

0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

DSWR 
DDISP 



0 

2 

12 

0 

0 



;; START OF COMMON TAGS 



CONTAINS THE TEST NU^E"? 
CONTAINS ERROn FLAG 
CONTAINS SUBTEST ITERATION fOUN* 
CONTAINS SCOPE LOOP ADDRESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERRORS DETECTED 
CONTAINS ITEM CONTROL BYTE 
CONTAINS MAX. ERRORS PER TEST 
CONTAINS PC OF LAST ERROR INSTRUCTION 
CONTAINS ADDRESS OF 'GOOD' DATA 
CONTAINS ADDRESS OF 'BAD' DATA 
CONTAINS 'GOOD' DATA 
CONTAINS 'BAD' DATA 
RESERVED— NOT TO BE USED 



.-.•AUTOMATIC MODE INDICATOR 
.•.-INTERRUPT MODE INDICATOR 



ADDRESS OF SWITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUFFER REG. ADDRESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS # OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A "LINE FEED" 
•TERMINAL AVAILABLE" FLAG (BIT<07>=0=YES) 
CONTAINS THE ADDRESS FROM 
WHICH (SREGO) WAS OBTAINED 





000006 






• REPT 


$CM3 




001162 


OOOOOO 




SREGO 


.WORD 


0 




•CONTAINS ( (SREGAD) +0) 


001164 


OOOOOO 




SRfGI 


.WORD 


0 




•CONTAINS ( (SREGAD) •►2) 


001166 


OOOOOO 




$RE62 


.WORD 


0 




•CONTAINS ( (SREGAD) •►4) 


001170 


OOOOOO 




$REG3 


.WORD 


0 




•CONTAINS ( (SREGAD) •►6) 


001172 


OOOOOO 




$REG4 


.WORD 


0 




; CONTAINS ((SREGAD) -^10) 


001174 


OOOOOO 




$REG5 


.WORD 


0 




; CONTAINS ((SREGAD) -^12) 




000006 




.REPT 


6 






001176 


OOOOOO 




STMPO 


.WORD 


0 




;USER DEFINED 


001200 


oooooo 




STMPI 


.WORD 


0 




■USER DEFINED 


001202 


OOOOOO 




$TW>2 


.WORD 


0 




USER DEFINED 


001204 


oooooo 




$TW>3 


.WORD 


0 




■USER DEFINED 


001206 


OOOOOO 




$TMP4 


.WORD 


0 




USER DEFINED 


001210 


oooooo 




$TMP5 


.WORD 


0 




•USER DEFINED 


001212 


OOOOOO 




$ESCAPE:0 






•ESCAPE ON ERROR ADDRESS 


001214 


207 


377 


377 SBELL 


• .ASCIZ 


<207><Z77><577> '. 




;CCDE FOR BELL 


001220 


077 




SQUES 


.ASCII 


/?/ 




•QUESTION MARK 


001221 


015 




$CRLF 


■ .ASCII 


<15> 




•CARRIAGE RETURN 


001222 


012 


000 


$LF: 


.ASCIZ 


<12> 




•LINE FEED 








***************************************************************** 



CKKTABO n/AA ME« MGMT PRT A 
APT MAIL80X-E TABLE 



MACRO Ml 113 23-APR-81 13:32 PAGE 



.S8TTL APT MAIL80X-E1A8LE 



I 2 
16-1 



SEQUENCE 21 



001224 
001224 
001226 
001230 
001232 
001234 
001236 
001240 
001242 
001244 
001244 
001245 
001246 
001250 
001252 



001254 



001254 
001256 
001260 
001262 
001264 
001266 
001270 
001272 
001274 
001276 
001300 
001302 
001304 
001306 
001310 
001312 
001314 
001316 
001320 
001322 
001324 
001326 
001330 
001332 
001334 
001336 
001340 
001342 
001344 
001346 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 

oocooo 

000000 
000000 



000000 
000000 
000000 
000000 

oooooo 

000000 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

020000 
000200 

oooooo 



.EVEN 

SMAIL: 

SMSGTy 

SFATAL 

$TESTN 

SPASS: 

SDEVCT: 

SUNIT: 

SMSGAD: 

IMSGLG: 

$E TABLE 

$ENV: 

$ENVM: 

SSWREG: 

SUSWR: 

SCPUOP.- 

• * 

• * 

# 

• * 

• * 

* 

;* 

SETEND: 
.MEXJT 

TESTNO: 
WASR6: 
TRAPPC 
TRAPPS 
UASSRO 
WAS SRI 
WASSR2 
TBI TPS 
TONUi 
VIRT1 
VIRT2 
PBALO 
PBAHI 
DATAOR 
DATAND 
PAT TOR 
PATAND 
ADDROR 
ADRAND 
ERRCNT 
BADPC 
OLDPC 
OLDPS 
PCPUER 
CPUEXP 
HOLFLG 
HDWFLAG 
READON: 
SMXCNT: 
$T8JT: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

.BYTE 
.BYTE 
.WORD 
.WORD 
.WORD 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



AMSGTY 

AFATAL 

ATESTN 

APASS 

ADEVCT 

AUNIT 

AMSGAD 

AMSGLG 

AENV 

AENVM 

ASWREG 

AUSUR 

ACPUOP 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

20000 

200 

0 



APT MAILBOX 
MESSAGE TYPE CODE 
FATAL ERROR NLfBER 
TEST NUMBER 
PASS COUNT 
DEVICE COUNT 
I/O UNIT NlfCER 
MESSAGE ADDRESS 
MESSAGE LENGTH 
APT ENVIR0r#1ENT TABLE 
ENVIRONMENT BYTE 
ENVIR0f#1ENT MODE BITS 
APT SWITCH REGISTER 
USER SWITCHES 
CPU TYPE. OPTIONS 
BITS 15-11=CPU TYPE 

1 1 /04=01 , 1 1 /05=02 , 1 1 /20=03 , 1 1 /40--04 ,11/45-05 
11/70=06,PDQ=07,0=10 
BIT 10=REAL TIME CLOCK 
BIT 9=FL0ATING POINT PROCESSOR 
BIT 8=MEM0RY MANAGEMENT 



HOLDS TEST NUMBER FOR TYPEOUTS 

USED TO STORE THE STACK POINTER AFTER A TRAP 

USED TO STORE THE PC OF A TRAP OR ABORT 

USED TO STORE THE PS OF A TRAP OR ABORT 

USED TO STORE CONTENTS OF SRO 

USED TO STORE CONTENTS OF SRI 

USED TO STORE CONTENTS OF SR2 

SAVES THE PSW THAT MAY HAVE ITS T-6iT ON 

HOLDS NIWER OF TIME-OUTS 

HOLDS VIRTUAL ADDRESS TO BE CONVERTED 

t ■ ■ • fl « 

HOLDS BITS <15:00> OF PHYSICAL ADDRESS 

HOLDS BITS <21:16> OF PHYSICAL ADDRESS 

HOLDS LOGICAL OR OF BAD DATA 

HOLDS LOGICAL AND OF BAD DATA 

HOLDS LOGICAL OR OF PATTERN LOADED 

HOLDS LOGICAL AND OF PATTERN LOADED 

HOLDS LOGICAL OR OF ADDRESS 

HOLDS LOGICAL AND OF ADDRESS 

HOLDS NUMBER OF ERRORS ON TEST 

HOLDS PC FROM ABORT OR TRAP 

HOLDS RETURN ADDRESS IN CASE OF LOOP ON ERROR 

HOLDS OLD PSW IN CASE OF LOOP ON ERROR 

HOLDS VALUE OF CPU ERROR REGISTER 

HOLDS EXPECTED CPU ERROR CONDITION 

HOLDS NlfBER OF TIMEOUTS FOR CARRY PROPAGATION TEST 

FLAGS APT SPECIAL HARDWARE FOR T47 I T50 

READ ONLY BIT IN MMRO 

HOLD MAX. Nlf«ER OF LOOP ITERATIONS 

'T* BIT STATE INDICATOR 



CKKTABO 11/';'; MEM M(?1T 
APT MA ILBOX-E TABLE 



001350 
001 356 



001356 
001360 
001362 
001364 
001366 
001370 
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J 2 
16-2 



136 



172200 
1 72240 
172300 
172340 
177600 
177640 



103 015 SCNTLC: .ASCIZ /•C/<15><12> 

.EVEN 

PAR TAB: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



172200 
1 72240 
1 72300 
172340 
177600 
177640 



SEQUENCE 



.•CONTROL C 



.-THIS IS THE TABLE Of THE FIRST PAR OR PDR 

;0F EACH GROUP. THEY ARE USED FOR THE DUAL 

.-ADDRESSING TEST. 

;SIPDRO 

;SIPARO 

.-KIPDRO 

.-KiPARO 

;UIPDRO 

;UIPARO 



CKKTABO 11/44 MEM MGMT PRT A 
ERROR POINTER TABLE 
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K 

17 



SEQUENCE 23 



1277 

1278 

1279 

1280 

1281 

1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 



001372 



001372 
001374 
001376 
001400 



001402 
001404 
001406 
001410 



001412 
001414 
001416 
001420 



001422 
001424 
001426 
001430 



001432 
001434 
001436 
001440 



001442 
001444 
001446 
001450 



037460 
043023 
045762 
046534 



037520 
043103 
046000 
046541 



037567 
043202 
046022 
046551 



037626 
043202 
046022 
046551 



037661 
043202 
046022 
046551 



037734 
043202 
046022 
046551 



S8TTL ERROR POJNTER TABLE 

*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
•THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
•LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT, 



•N0TE1 
*N0TE2; 



SERRTB: 
.••ITEM 1 



EM 

DH 
DT 
DF 



EMI 
DHT 
DTI 
DF1 



;*ITEM 2 



EM2 
DH2 
DT2 
DF2 



.••ITEM 3 



EM3 
DH3 
DT3 
DF3 



.••ITEM 4 



EM4 

DH3 

DT3 
DF3 



.-•ITEM 5 



EMS 
DH3 
DT3 
DF3 



.••ITEM 6 



EM6 
DH3 
DT3 
DF3 



IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (SERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
POINTS TO THE ERROR MESSAGE 
POINTS TO THE DATA HEADER 
POINTS TO THE DATA 
POINTS TO THE DATA FORMAT 



UNEXPECTED CPU TRAP TO LOC. 004 

OLD PC OLD PSW R6 WAS CPUERR TESTNO ERRORPC 

TRAPPC,TRAPPS.WASR6,CPUERR.TESTN0,$ERPPC. 0 

0,0,0«0,0 



UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 

OLD PC OLD PSW R6 WAS SRO SRI SR2 TESTNO E 
TRAPPC . TRAPPS , WASR6 , WASSRO , WASSR 1 . WAS SR2 , T E S TNO , IE RRPC . 0 
0,0,0,0,0,0.0,0 



PRIORITY BITS SET WRONG IN PSW 
WROTE READ TESTNO ERRORPC 
$REG0,$REG1 .TESTNO,$ERRPC,0 
0,0,0,0 



MODE BITS SET WRONG IN PSW 
WROTE READ TESTNO ERRORPC 
J'^EG0,$REG1 , TESTNO, SERRPC ,0 
0.0,0,0 



DUAL ADDRESSING BETWEEN HI8L0 BYTES OF PSW 
WROTE READ TESTNO ERRORPC 
SREGO.SREGI ,TESTNO,SERRPC,0 
0,0.0,0 



KERNEL R6 CHANGED BY WRITING SUPERVISOR/USER R6 
WROTE READ TESTNO ERRORPC 
$REG0,$REG1, TESTNO, SERRPC, 0 
0.0.0,0 



CKKTABO 11 /a 
ERROR POINTER 



MEW MGMT 
TABLE 
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1^13 

13U 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

132A 

1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 



001452 
001454 
001456 
001460 



001462 
001464 

001466 
001470 



001472 
001474 

001476 
001500 



001502 
001504 

001506 
001510 



001512 
001514 
001516 
001520 



001522 
001524 
001526 
001530 



001532 
001534 
001536 
001540 



001542 
001544 

001546 
001550 



001552 
001554 
001556 
001560 



040017 
043242 
046034 
046555 



040055 
043272 

046044 
046560 



040121 
043372 

046060 
046565 



040161 
043512 

046074 
046572 



040230 
043652 
046034 
046555 



040265 
043702 
046112 
046551 



040321 
043742 
046124 
046551 



040360 
044002 

046136 
046534 



040427 
044103 
046152 
046541 



;*ITEM 7 

EM7 
DH7 
DT7 
OF 7 

.••ITEH 10 

EMIO 
OHIO 

DTIO 
DFIO 

;*JTEM 11 

EMU 
DHll 

DTll 
DF11 

;*ITE« 12 

EMI 2 
DH12 

DT12 
DF12 

;*ITEM 13 

EMI 3 
DH13 
DT7 
DF7 

;*ITEM 14 

EMU 
DH14 
DT14 
DF3 

.••ITEM 15 

EMI 5 
DH15 
DT15 
DF3 

.-•ITEM 16 

EMI 6 
DH16 

t)T16 
DF1 

;*ITEM 17 

EMI 7 
DH17 
DT17 
DF2 



SEQUENCE 



A MEMORr MGMT. REG. TJMED OUT 
ADDRESS TESTNO ERRORPC 
$REGO,TESTNO.$ERRPC.O 
0.0.0 



SUWARY OF MEM. MGMT. REG. TIMEOUTS 

REGISTER-ADDRS NUM. OF 

AND-ED OR-ED TIMOUTS TESTNO ERRORPC 

ADRAND .ADDROR, TONUM. TESTNO. $ERRPC , 0 

0.0.1.0.0 



MEM. MGMT. REG. WOULD NOT CLEAR 
RE6JSTR READ READ-CBINARY) 

ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC 

$REG0.$«EG1 .SREGI .TESTNO. SERRPC.O 

0.0.2.0,0 



;MEM. MGMT. REG. BITS NOT SET CORRECTLY 
.-REGISTR WROTE READ READ 

;ADDRESS (OCTAL) (OCTAL) (BINARY) TESTNO ERRORPC 
.-SREGO. SREGI .SREG2.$REG2.TESTNO.SERRPC.O 
;0. 0.0.2,0.0 



SRO EFFECTED BY WRITE TO PSU 
READ TESTNO ERRORPC 
$REGO,TESTNO,$ERRPC,0 
0,0,0 



MMRl DID NOT TRACK PROPERLY 
EXPECTD (MMRl) TESTNO ERRORPC 
$RE63,$RE61 , TESTNO, SERRPC.O 
0.0,0,0 



MMR3 IS HOLDING THE WRONG DATA 
LOADED (MMR3) TESTNO ERRORPC 
SREG2. SREGI .TESTNO.SERRPC.O 
0.0.0.0 



DUAL ADDRESSING BETWEEN PAR-PDR GROUPS 

INDEX INDEX PAR-PDR 

EXPECTD RECEIVD ADDRREAD TESTNO ERRORPC 

SREG0«SREG1 .SREG2. TESTNO. SERRPC.O 

0.0,0,0.0 



PHYS. ADDR. FORMED READ WRONG IN MAINT. MODE 
VIR ADDR KIPAR4 GDDATA BADDATA TESTNO ERRORPC 
$REG0,KIPAR4. SREGI, SREG2. TESTNO.SERRPC.O 

0.0.0.0.0.0 



CKKTABO 11/^.4 MEM MGMT PRT A 
ERRCDR POINTER TABLE 



1370 
1371 
1372 
1373 
137<. 
1375 
1376 



001562 
001564 

001566 
001570 



040505 
044164 

046170 
046606 
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.-•ITEM 20 

£M20 
DH20 

DT20 
DF20 



M 2 
PAGE 18-1 



SEOL€NCE 25 



PHYS. ADDR. FORMED READ WRONG IN RELOCATE MODE 
PHYSiCL PAR 4 PAR 5 

ADDRESS VBA VBA PAR 4 PAR 5 PSW TESTNO 

PaAL0.VJRTl,VIRT2.$REG4,$REG5,$TMP0.TESTN0.fERRPC,0 

3,0,0.0.0,0,0,0 



ERR 
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1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 



001572 
001574 
001576 
001600 



001602 
001604 

001606 
001610 



001612 
001614 

001616 
001620 



001622 
001624 
001626 
001630 



001632 
001634 
001636 
001640 



001642 
001644 
001646 
001650 



001652 
001654 
001656 
001660 



001662 
001664 
001666 
001670 



001672 
001674 

001676 
001700 



040557 
044312 
046212 
046551 



040612 
044352 

046224 
046606 



040670 
043372 

046060 
046565 



040726 
044470 
046246 
046616 



041004 
043202 
046254 
046551 



041055 
043103 
046000 
046541 



041115 
044312 
046266 
046551 



041171 
044510 
046300 
046551 



041231 
044550 

046312 
046551 



;*ITEM 



;*ITEM 



.■•ITEM 



.••ITEM 



.••ITEM 



.-•ITEM 



.-•ITEM 



.-•ITEM 



.-•ITEM 



21 
EM21 
DH21 
DT21 
DF3 

22 
EM22 
DH22 

DT22 
DF20 

23 
EM23 
DH11 

DT11 
DF11 

24 
EM24 
DH24 
DT24 
DF24 

25 
EM25 
DH3 
DT25 
0F3 

26 
EM26 
DH2 
DT2 
DF2 

27 
EM27 
DH21 
DT27 
DF3 

30 

EM30 
DH30 
DT30 
DF3 

31 
EM31 
DH31 

DT31 
DF3 
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SEQUENCE 26 



SR2 NOT TRACKING CORRECTL^ 
SR2 WAS EXPECTD TESTNO ERROPC 
WASSR2.$RE61 . TESTNO. SERRPC .0 
0.0.0.0 



URONG PDR'S REFERENCED UHILE IN RELOCATE MODE 
PHYSICL PAR 4 

ADDRESS V.8.A. PAR 4 SRO WAS SR2 WAS PSW TESTNO ERRO 
PBALO , VI RT 1 . $REG4 . WAS SRO , WASSR2 . $ TMPO , TE S TNO . SERRPC . 0 
3.0.040,0.0.0,0 



PAR OR PDR WAS CHANGED BY A RESET 
REGISTR READ READ-(8INARY) 

ADDRESS (OCTAL) 5432109876543210 TESTNO ERRORPC 

$RE60.$RE61 .SREGI .TESTNO.SERRPC.O 

0.0.2.0.0 



MAINT MODE (SR0<8» NOT DISABLED BY A RESET 

TESTNO ERRORPC 

TESTNO.SERRPC.O 

0.0 



DATA INCORRECT AFTER A MAINT. MODE WRITE 
WROTE READ TESTNO ERRORPC 
SRE61 .SRE62, TESTNO.SERRPC.O 
0.0.0.0 



SOURCE RELOCATED IN MAINT. MODE 

OLD PC OLD PSW R6 WAS SRO SR2 TFSTNO ERRORPC 
TRAPPC . TRAPPS.WASR6.WASSR0,WASSR2. TESTNO. SERRPC .0 
0.0.0.0.0.0.0 



SR2 DIDNOT LOCKUP CORRECT VIRTUAL ADDR. 
SR2 WAS EXPECTD TESTNO ERRORPC 
WASSR2 . SRE G4 , TE S TNO . SE RRPC . 0 
0.0.0.0 



FOLLOWING PAR/PDR WILL NOT ZERO 
ADDRESS DATA TESTNO ERRORPC 
SRE60,SREG2. TESTNO, SERRPC, 0 
0,0.0.0 



SUMMARY OF DUAL ADDRESSING ERRORS 

ADDROR ADDRAND ADDROR ADDRAND 

LOADED LOADED ENABLED ENABLED TESTNO /TERRORS 

ADDROR . ADRAND . DATAOR . DATAND . TE STNO . ERRCNT . 0 

0.0.0.0.0.1 



CKK7A80 11/^.4 ME« MG«T PRT A 
ERROR POINTER TABLE 
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K53 

K54 

K35 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 



001702 
001704 
001706 
001 710 



001712 
001714 
001 716 
001720 



001722 
001724 

001726 
001730 



001732 
001734 
001736 
001740 



001742 
001744 
001746 
001750 



001752 
001754 
001756 
001760 



001762 
001764 

001766 
001770 



001772 
001774 
001776 
002000 



002002 
002004 

002006 
002010 



041273 
044667 
046330 
046620 



041335 
044767 
046352 
046626 



041401 
045037 

000000 
000000 



000000 
000000 
046366 
046534 



041472 
045057 
000000 
000000 



000000 
000000 
046376 
046555 



041561 
045126 

046034 
046555 



041644 
045164 
046412 
046541 



041725 
045225 

046424 
046541 



;»ITEM 



.••ITEM 



.••ITEM 



.••ITEM 



.••ITEM 



.••ITEM 



;*ITEM 



.••ITEM 



.••ITEM 



32 

EM32 
DH32 
DT32 
DF32 

33 
EM33 
DH33 
DT33 
DF33 

34 
EM34 
DH34 

.WORD 
.WORD 

35 
.WORD 
.WORD 
DT35 
DFl 

36 
EM36 
DH36 
.WORD 
.WORD 

37 
.WORD 
.WORD 
DT37 
DF7 

40 
EM40 
DH40 

DT7 
DF7 

41 
EM41 
DH41 
DT41 
DF2 

42 
EM42 
DH42 

DT42 
DF2 



0 
0 



0 
0 



0 
0 



0 
0 



SEOUEWCE 27 



SUMMARY OF COUNT PATTERN FAILURES 

ADOROR ADDRAND PATRNOR PATRNAND DATAOR DATAAND TESTNO #E 
ADDROR . ADRAND . PAT TOR . PATANP . OATAOR , DATANO , TE STNO,ERRCNT , 0 
0.0,0.0,0,0.0.1 



ERROR IN BYTE ADDRESSING OF PAR/PDR 
ADDRESS EXPECTD RECEIVD TESTNO ERRORPC 
$REG0,$REG2.$RE61 ,TESTNO.$E«RPC.0 
0.0,0,0,0 



THE FOLLOWING ARE DUAL ADDRESSING ERRORS FOR PAR'S/POR'S 

ADDRESS ADDRESS 

LOADED JUST READ TESTNO 

THIS IS A NULL VALUE TO INHIBIT TYPING 

THIS IS A NULL VALUE TO INHIBIT TYPING 



THIS IS A NULL VALUE TO INHIBIT TYPING 
THIS IS A NULL VALUE TO INHIBIT TYPING 
SREG0,SRE61, TESTNO, 0 
0.0,0 



THE FOLLOWING ARE COUNT PATTERN ERRORS FOR PAR'S/POR'S 
ADDRESS DATAREAD PATTERN COUNT TFSTNO 
THIS IS A NULL VALUE TO INHIBIT TYPING 
THIS IS A NULL VALUE TO INHIBIT TYPING 



THIS IS A NULL VALUE TO INHIBIT TYPING 
THIS IS A NULL VALUE TO INHIBIT TYPING 
SRE60,SREG2.SRE64,SREG1 , TESTNO, 0 
0,0,0,0,0 



ILLEGAL (MODE 10) STACK POINTER NOT MAPPED TO USER 

READOFF TESTNO ERRORPC 

STACK 

SREGO, TESTNO, SERRPC.O 
0,0,0 



18-6IT MAPPING POSSIBLE HOLE IN MAIN MEMORY FROM 
STARTADR FINISHADR TESTNO ERRORPC 
STMPI ,$TMP2, TESTNO, SERRPCO 
0,0,0,0 



FAULTY CARRY PROPAGATION 18-6IT MAPPING 

PATTERN DATA ADDRESS 

LOADED FETCHED INTENDED TESTNO ERRORPC 

$REG2.$RE63.$RE60, TESTNO, $ERRPC.O 

O.O.O.O.JD 



CKKT>«0 n/<i<i MEM MGMT PRT A 
ERROR POINTER TABLE 
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K89 

K90 

H91 

K92 

K93 

K9A 

K95 

U96 

K97 

K98 

K99 

1500 

1501 

1502 

1503 

150A 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

151A 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 



00P012 
002014 
002016 
002020 



002022 
002024 
002026 
002030 



002032 
002034 
002036 
002040 



002042 
002044 
002046 
002050 



002052 
002054 
002056 
C02060 



002062 
002064 
002066 
002070 



002072 
002074 

002076 
002100 



002102 
002104 
002106 
002110 



002112 
002114 

002116 
002120 



041775 
045327 
046440 
046636 



042053 
044470 
046246 
046616 



042126 
045357 
046450 
046555 



042175 
045407 
046034 
046555 



042250 
045436 
046460 
046541 



042306 
045164 
046412 
046541 



042367 
045225 

046424 
046541 



042447 
045327 
046440 
046541 



042525 
045225 

046424 
046541 



;*ITEH 



;*ITEM 



;*JTEM 



;*ITEM 



;*ITEM 



;*ITEM 



.-•ITEM 



;*ITEM 



.••ITEM 



43 
EM43 
DH43 
DT43 
DF43 

44 
EM44 
DH24 
DT24 
DF24 

45 
EM45 
DH4S 
DT45 
OF 7 

46 
EM46 
0H46 
DT7 
OF 7 

47 
EM47 
DH47 
DT47 
0F2 

50 
EMSO 
DH41 
0T41 
DF2 

51 

EM51 
DH42 

DT42 
DF2 

52 
EM52 
DH43 
DT43 
DF2 

53 

EM53 
DH42 

DT42 
DF2 
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SEQUENCE 28 



18-eiT MAPPING POSSIPLE HOLE AT TOP OF MEMORY 
STARTADR TESTNO ERRORPC 
$TMP1,TESTNO,SERRPC.O 
4.0,0 



NO TRAP THRU ERRVEC.AT 18HBIT ADDH. 760000 
TESTNO ERRORPC 
TESTNO. SERRPC.O 
0.0 



DIDN'T GET WRAP AROUND TO ADDRESS ZERO 
DATA TESTNO ERRORPC 
SREGI. TESTNO. SERRPC.O 
0.0.0 



NO TRAP THRU ERRVEC. ON NON-EXISTANT ADDR. 
NEADDR TESTNO ERRORPC > 
SREGO, TESTNO. SERRC.O 
0.0.0 



PREMATURE END OF MEMORY FOUND 
KIPAR4 LASTBJC TESTNO ERRORPC 
KIPAR4 .SLSTBK , T£ S TNO . SERRPC. 0 
0,0.0.0 



22-eiT MAPPING POSSIBLE HOLE IN MAIN MEMORY FROM 
STARTBK FINISHBK TESTNO ERRORPC 
STMPl ,$TMP2, TESTNO, SERRPCO 
0,0,0,0 



BAD RELOCATION, CARRY PROPAGATION 22-61 T MAPPING 

PATTERN DATA ADDRESS 

LOADED FETCHED INTENDED TESTNO ERRORPC 

$RE62,SftEG3,$REG0, TESTNO,SERRPC .0 

0,0,0,0,0 



22-81 T MAPPING POSSIBLE HOLE AT TOP OF MEMORY 
STARTADR TESTNO ERRORPC 
STMPl. TESTNO, SERRPC.O 
0,0,0 



DID NOT GET UNIBUS ADDRESS 

PATTERN DATA ADDRESS 

LOADED FETCHED INTENDED TCSTNO ERRORPC 

SREG2 , SREG3 . SREGO . TE STNO . SERRPC . 0 

0.0.0,0,0 



CKKTABO 11/44 
ERROR POINTER 



MEM MCJ1T 
TABLE 



15U 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

155? 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

1568 

1569 

1570 

1571 

1572 

1573 

1574 



002122 
002124 

002126 
002130 



002132 
002134 

002136 
002140 



002142 
002144 
002146 
002150 



002152 
002154 
002156 
002160 



002162 
002164 
002166 
002170 



042560 
045502 

046472 
046551 



042615 
045562 

046504 
046534 



042654 
045662 
046520 
046555 



042720 
045712 
046124 
046551 



042765 
045752 
046530 
046534 
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;»ITEM 54 

EM54 
0H54 

DT54 
DF3 

;*ITEM 55 

EM55 
DH55 

DT55 
DF1 

;*ITEM 56 

En56 
DH56 
DT56 
DF7 

;*ITEM 57 

EM57 
DH57 
DTIS 
OF 3 

;*ITEM 60 

EM60 
DH60 
DT60 
DF1 



SEQUENCE 



W-eiT DID NOT GET SET IN POR 
PDR VIRTUAL 

TESTED ADDRESS TESTNO ERRORPC 

$REG5,$RE63,TESTN0.fERRPC.0 

0.0.0.0 



W-eiT SET IN MORE THAN ONE PDR 

PDR IN PDR VIRTUAL 

ERROR TESTED ADDRESS TESTfgO ERRORPC 

$RE GO . $REG5 . $RE G3 . TE S TNO . SERRPC . 0 

0,0.0.0.0 



U-eiT NOT CLEARED BY WRITING TO PDR 
PDR TESTNO ERRORPC 
$REG5. TESTNO. SERRPC. 0 
0.0.0 



W-eiT GOT SET DURING ODD ADDR. ABORT 
PDR WAS EXPECTD TESTNO ERRORPC 
$REG2.$REG1. TESTNO. SERRPC. 0 
0.0.0.0 



NO APT SPECIAL HARDWARE FOUND 

ERRORPC 

SERRPC. 0 

0 



CKKTABO 11/4-; MEM MGMT PRT A MACRO Ml 11 3 
TL«N OFF T-BIT AND SAVE CURRENT PSW 
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SEQUENCE 30 



1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 

1583 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1593 

1594 



002172 033727 177776 000020 

002200 OOKll 

002202 013746 177776 

002206 011637 001272 

002212 042716 000020 

002216 012746 002224 

002222 000006 

002224 000207 



S8TTL TURN OFF TH3IT AND SAVE CURRENT PSU 

SUBROUTINES UNIQUE TO THIS PROGRAM 

THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN 
THE PSU IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN 
'TBI TPS" SO THAT THE PSW CAN BE RESTORED TO ITS PREVIOUS 
CONDITION yHEN CONDITIONS WARRANT T-flIT TRAPPING. 



TOFF) 



1$: 



BIT 
BEO 
MOV 
MOV 

SIC 
MOV 
RTT 
RTS 



PSW,/lfT8IT 
IS 

PSW.-(SP) 
(SP). TBI TPS 

*T8IT.(SP) 
#1$,-(SP) 

PC 



IS THE T-6IT SET IN THE PSW? 
EXIT IF NO 

PUSH PRESENT PSW ON THE STACK 
ALSO SAVE IT IN 'TBI TPS" FOR 
RESTORING LATER 

CLEAR THE T-BIT (BIT 4) IN THE PSU 
PUSH PC OF 'T^TS" ON STACK 
'T^ETURN" TO 1$ WITH TH3IT OFF 
RETURN TO PROGRAM 



CKICTABO n/A4 
TURN ON T-BIT 



1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 



HEM MGHT PRT A MACRO Mil 13 
AND RESTORE PREVIOUS PSU 
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SEQUENCE 



51 



.S8TTL TURN ON TH3IT AND RESTORE PREVIOUS PSU 

►•••••••••••••**•***•••••»••••»*******••••••••»•••******•••*••• 

THIS SUBROUTINE IS USED TO RESTORE THE PROCESSOR STATUS 
TO ITS PREVIOUS CONDITION BY RESTORING THE "T-BIT PSU" 
SAVED Br THE 'TOFF" SUBROUTINE IN THE 'TBITPS" LOCATION. 



002226 033727 001272 000020 

00223A 00U10 

002236 013746 001272 

0022A2 012737 0003A0 001272 

002250 0127A6 002256 

002254 000006 

002256 000207 



TON: 



1$: 



BIT 
BEQ 
MOV 
MOV 
MOV 
RTT 
RTS 



T8ITPS,#TBIT 
1$ 

TBITPS. -(SP) 

*340.TBITPS 

*1$.-(SP) 

PC 



WAS T-BIT ON IN THE PREVIOUS PSW? 
EXIT IF NO 

PUSH PREVIOUS PSU ON THE STACK 
RESET THE 'TBITPS" LOCATION 
PUSH PC OF "RTS" ON STAC< 
•T^ETURN" TO 1$ UITH T-BIT RESTORED 
RETURN TO PROGRAM 



CKKTABO 11/AA ME« MGMT PRT A MACRO M1113 23-APR-81 13:32 
CLEAR 16 PAR'S OR POR'S STARTING FROM ADDRESS IN R5 



G 

PAGE 25 



SEQUENCE 32 



1610 
1611 
1612 
1613 
16U 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
162A 
1625 
1626 
1627 



S8TTL CLEAR 16 PAR'S OR PDR'S STARTING FROM ADDRFSS IN R5 

THIS ROUTINE CLEARS 16 CONSECUTIVE MEMORV MANAGEMENT 
REGISTERS STARTING WITH THE REGISTER POINTED TO BV R5. 
IT SAVES RO ON THE STACK. AND LOADS A COUNT IN RO. 
CLEARS THE PAR'S OR PDR'S. AND THEN RESTORES RO 
BEFORE RETURNING. 

CALL: MOV #ICIPARG.R5 ;PUT ADDRESS OF FIRST KERNAL PAR INTO R5 

JSR PC.CLRREG .'CLEAR ALL THE KERNAI PAR'S 

*************************************************************** 



002260 0100A6 

002262 012700 000020 

002266 005025 

002270 077002 

002272 012600 

002274 000207 



CLRREG: 
1$: 



MOV 
MOV 
CLR 
SOB 
MOV 
RTS 



RO.-(KSP) 

#20. RO 

(R5)* 

RO.IS 

(KSP)*.RO 

PC 



SAVE RO ON THE STACK 
PUT COUNT IN RO 

CLEAR PAR OR PDR POINTED TO BY R5 
BRANCH BACK 15 DECIMAL TIMES 
POP RO FROM STACK 
RETURN TO TEST 



CKKTA80 11 MEM MGMT PRT A MACRO Ml 113 23-APR-81 13:32 
CLEANUP LOCATIONS THAT HOLD LOGICAL 'AND' AND 'OR' 
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SEQUENCE 33 



1628 
1629 
1650 
1631 
1632 
1633 
1654 

1655 002276 

1656 002276 

1657 002502 

1658 002306 
1639 002312 
16A0 002316 
16A1 002322 
16A2 002326 
1643 002552 



005057 
005057 
005057 
012700 
010057 
010057 
010057 
000207 



001506 
001516 
001512 
M7777 
001510 
001520 
001 5U 



.S8TTL CLEANUP LOCATIONS THAT HOLD LOGICAL 'AND' AND 'OR* 

• •***********•*******•*********••****•**••*********•*•******••*•* 

Y* THIS SUBROUTINE IS USED TO INITIALIZE ALL LOCATIONS THAT 

HOLD THE 'VOGICAL AND" AND 'lOGICAL OR" OF THE DATA AND 
ADDRESSES THAT FAILED DURING THE EXECUTION OF A TEST. 

• • tiiiiiiiiiiii**** ********************************************** ****** 



CLEANUP: 



CLR 
CLR 
CLR 
MOV 
MOV 
MOV 
MOV 
RTS 



DATAOR 
ADDROR 
PAT TOR 
*-1.R0 
R0,DATAND 
RO.ADRAND 
RO. PAT AND 
PC 



LOCATION OF LOGICAL OR OF BAD DATA 
LOCATION OF LOGICAL OR OF ADDRESS 
LOCATION OF LOGICAL OR OF PATTERN LOADED 
LOAD -1 INTO RO TO INITIALIZE 
LOCATION OF LOGICAL AND OF BAD DATA 
LOCATION OF LOGICAL AND OF ADDRESS 
LOCATION OF LOGICAL AND OF PATTERN LOADED 
RETURN TO TEST 



CKKTABO 11 /AA MEM MGMT PRT A MACRO Mill 3 
DUAL ADDRESSING WHEN LOADING A PAR OR PDR 
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SEQUENCE 3^ 



16AA 

16A5 

16A6 

16A7 

16A8 

1649 

1650 

1651 

1652 

1653 

165A 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

166A 



00233A 
00235A 
0O23A0 
00234A 
002350 
0O235A 
002360 
00236A 
002366 
002370 
002372 
00237A 



012637 
050037 
030037 
050137 
030137 
105737 
001002 
10A03A 
OOOAOl 
10A035 
000177 



001326 
001316 
001320 
001306 
001310 
001103 



1 76726 



S8TTL DUAL ADDRESSING WHEN LOADING A PAR OR PDR 
•*************************************************************** 

i THIS SUBROUTINE WILL LOG AND REPORT ALL DUAL ADDRESSING ERRORS 

• FOUND IN BOTH PAR'S AND PDR'S. A 'T.OGICAL OR" AND A "LOGICAL 

• AND" OF THE WRITTEN ADDRESSES WILL BE MAINTAINED IN 'ADDROR'. 

• AND 'ADRAND'. THE LOG ON THE ADDITIONAL OR FAILING ADDRESSES 

• WILL BE MAINTAINED IN 'DATAOR' AND 'DATAND*. 



DUALADR: 



IS: 
2$: 



MOV (KSP)+,OLDPC 

BIS R0,ADDROR 

BIT RO, ADRAND 

BIS R1, DATAOR 

BIT R1. DATAND 

TSTB SERFLG 

BNE 1$ 

ERROR +34 

BR 2$ 

ERROR +35 

JMP aOLDPC 



SAVE RETURN ADDRESS IN CASE OF 
LOGICAL OR OF WRITTEN ADDRESS 
LOGICAL AND OF WRITTEN ADDRESS 
LOGICAL OR OF DUALED DATA 
LOGICAL AND OF DUALED DATA 
SEE IF THIS IS FIRST ERROR 
BRANCH IF NOT FIRST ERROR 

.•BRANCH TO EXIT 

.•RETURN TO TEST 



LOOP 



CKKTABO 11/^^ 
COUNT PATTERN 



1665 

1666 

1667 

1668 

1669 

1670 

1671 

1072 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 



MEM MGMT PRT A 
ERRORS IN PAR'S 



MACRO mi 13 

OR PDR'S 
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SEQUENCE 35 



002400 
002400 
002404 
002410 
002414 
002420 
002424 
002430 
002434 
002440 
002442 
002444 
002446 
002450 



012637 
050037 
030037 
050137 
030137 
050237 
030237 
105737 
001002 
104036 
000401 
104037 
000177 



001326 
001316 
001320 
001312 
001314 
001306 
001310 
001103 



176652 



S8TTL COUNT PATTERN ERRORS IN PAR'S OR PDR'S 

• THIS SUBROUTINE IS USED TO LOG AND REPORT THE COUNT PATTERN 

• ERRORS OCCURRING WHEN TESTING THE PAR'S AND PDR'S. THE 

• '"LOGICAL OR" AND "LOGICAL AND" OF VARIOUS DATA WILL BE 

• MAINTAINED A FOLLOWS : 

• 1, ADDRESSES OF FAILED REGISTERS IN 'ADDROR' AND 'ADRAND' 

• 2. DATA FETCHED FROM REGISTERS IN 'DATAOR' AND 'DATAND' 

• 3. PATTERN LOADED INTO REGISTERS IN 'PATTOR' AND 'PATANO' 

• ******* ********************** ********************************** 

PARCOUNT: 



1$: 
2$: 



MOV 


<KSP)*,OLDPC 


SAVc Nc ILNN ADOHcoo IN LAdC Ur LUOr 


BIS 


RO, ADDROR 


LOGICAL OR OF FAILING ADDRESS 


BIT 


RO, ADRAND 


LOGICAL AND OF FAILING ADDRESS 


BIS 


Rl .PATTOR 


LOGICAL OR OF PATTERN LOADED 


BIT 


R1 .PATAND 


LOGICAL AND OF PATTERN LOADED 


BIS 


R2. DATAOR 


LOGICAL OR OF DATA FETCHED 


BIT 


R2, DAT AND 


LOGICAL AND OF DATA FETCHED 


TST8 


$ERFLG 


•SEE IF THIS IS THE FIRST ERROR 


BNE 


1$ 


•BRANCH IF NOT FIRST ERROR 


ERROR 


♦36 




BR 


2$ 


■BRANCH TO EXIT 


ERROR 


+37 




JMP 


aOLDPC 


•RETURN TO TEST 


; *CALL : 






; * 


JSR PC.fSIZE 




• * 


RETURN 




;*$LSTAD WILL CONTAIN: 




; * 


WITH Kill OPTION 


— LAST VIRTUAL ADDRESS OF THE LAST BANK 


; * 


WITHOUT KTll OPTION — LAST ABSOLUTE ADDRESS OF AVAILABLE MEMOR 



002454 


010046 






SSI2E: MOV 


RO,-(SP) 




002456 


010146 






MOV 


RI.-(SP) 
R2,-(SP) 


• ■ 


002460 


010246 






MOV 


• ■ 


002462 


010346 






MOV 


R3. -(SP) 


• • 


002464 


013746 


000004 




MOV 


ERRVEC.-(SP) 


• • 


002470 


013746 


000006 




MOV 


ERRVEC+2,-(SP) 




002474 


010600 






MOV 


SP,RO 






;:SET THE ERRVEC PS TO THE PRESENT 


002476 


104400 






TRAP 




;; 


002500 


012637 


000006 




MOV 


(SP)+,ERRVEC+2 


• • 


002504 


012701 


003776 




MOV 


#3776, Rl 




002510 


105727 






TST8 


<PC) + 


;; 


002512 


000200 






SKT11: .WORD 


200 


0 0 


002514 


100070 






BPL 


SCORE 


;; 


002516 


012737 


002670 


000004 


MOV 


#$KTNEX, ERRVEC 


* * 


002524 


005737 


177572 




TST 


SRO 


;; 


002530 


052737 


100000 


002512 


BIS 


#1 00000, $KT11 


0 0 


002536 


012737 


003330 


000250 


MOV 


M1GMERR,MnVEC 


0 0 


002544 


012737 


000340 


000252 


MOV 


#340,MMVEC*2 
-(SP) 




002552 


005046 






CLR 




002554 


012702 


172340 




MOV 


#KJPAR0.R2 


0 0 



*$LST8K WILL CONTAIN THE LAST BANK AS A SAF 
*8JT07 = 0 DON'T USE MEMORY MANAGEMENT 

* MUST BE SETUP BEFORE TH CALL 

*8IT15 = 0 DON'T HAVE MEMORY MANAGEMENT OPTION 

* DETERMINED BY ROUTINE 

*$LSTAO WILL CONTAIN THE LAST AVAILABLE MEMORY LOCATION 

SAVE RO ON THE STACK 
SAVE Rl ON THE STACK 
SAVE R2 ON THE STACK 
SAVE R3 ON THE STACK 
SAVE PRESENT ERROR VECTOR PS & 

;;SAVE THE STACK POINTER 
PS 

PUSH OLD PSW AND PC ON STACK 
SAVE THE PSW IN ERRVEC +2 
SETUP ADDRESS 
USE MEMORY MANAGEMENT? 
SET TO USE MEMORY MANAGEMENT 
BR IF NO 
SET FOR TIMEOUT 
KT11 ARE YOU THERE? 
YES— SET KT11 KEY 
SET IN CASE OF ERROR 

INITIALiZE FOR "PAR" LOADING 
ADDRESS OF FIRST 't^AR" 



PC 



CKKTABO MEM MGMT PRT A MACRO Ml 113 23-APR-81 

COUNT PATTERN ERRORS IN PAR'S OR PDR'S 



002560 


012703 


000010 






MOV 


00256A 


012762 


077406 


1 77740 


It: 


MOV 


002572 


011622 








MOV 


002574 


062716 


000200 






ADD 


002600 


077307 








SOB 


002602 


012742 


177600 






MOV 


002606 


005042 








CLR 


002610 


012737 


002626 


000004 




MOV 


002616 


012737 


000020 


172516 




MOV 


002624 


000401 








BR 


002626 


022626 






2$: 


CMP 


002630 


005237 


177572 




3$: 


INC 


002634 


012737 


002660 


000004 




MOV 


002642 


005737 


143776 




4S: 


TST 


002646 


062712 


000040 






ADD 


002652 


023712 


1 72356 






CMP 


002656 


101371 








SHI 


002660 


011202 






SKTOUT: 


MOV 


002662 


005037 


177572 






CLR 


002666 


000421 








BR 


002670 


042737 


100000 


002512 


SKTNEX: 


BIC 


002676 


012737 


002726 


000004 


SCORE : 


MOV 


002704 


005002 








CLR 


002706 


062701 


004000 




1$: 


ADD 


002712 


062702 


000040 






ADD 


002716 


00571 1 








TST 


002720 


022701 


1 77776 






CMP 


002724 


001370 








BNE 


002726 


162701 


004000 




SCROUT: 


SUB 


002732 


162702 


000040 




SSJZEX: 


SUB 


002736 


012737 


002754 


000004 




MOV 


002744 


012701 


020000 






MOV 


002750 


005721 






1$: 


TST 


002752 


000776 








BR 


002754 


162701 


000002 




2$: 


SUB 


002760 


010006 








MOV 


002762 


012637 


000006 






MOV 


002766 


012637 


000004 






MOV 


002772 


010137 


003020 






MOV 


002776 


010237 


003022 






MOV 


003002 


012603 








MOV 


003004 


012602 








MOV 


003006 


012601 








MOV 


003010 


012600 








MOV 


003012 


005037 


1 77766 






CLR 


003016 


000207 








RTS 


003020 


000000 






SLSTAD: 


.WORD 


003022 


000000 






SLSTBK: 


.WORD 



L- 



K 3 

13:32 PAGE 28-1 



**D8-R3 
*77466.-40(R2) 
(SP),(R2)+ 
#200. (SP) 
R3,l$ 

*1 77600. -(R2) 
-(R2) 

*2$.ERRVEC 

*20.SR3 

3$ 

(SP)+.(SP)+ 
SRO 

*$KTOUT.ERRVEC 

143776 

*40.(R2) 

KIPAR7.(R2) 

4$ 

(R2).R2 
SRO 

$SIZEX 

*1 00000. $KT11 

mROUT.ERRVEC 

R2 

*4000,R1 
»^0,R2 

(R1) 

*1 77776. R1 
IS 

*4000,R1 
*40.R2 
*2S.ERRVEC 
#20000, R1 
(R1) + 
IS 

#2.R1 

RO SP 

(SP)+, ERRVEC+2 

(SP) ♦.ERRVEC 

RI.SLSTAD 

R2.$LSTBK 

(SP) ♦.R3 

(SP)*.R2 

(SP)+. R1 

(SP)+.RO 

CPUERR 

PC 

0 

0 



;;L0AD EIGHT •T>AR.'S" AND EIGHT •T>DR. 

;;PDR = 4K. UP. READ/WRITE 

;;LOAD "PAR" 

; .-UPDATE FOR NEXT 'PAR" 

;;LOOP UNTIL ALL EIGHT ARE LOADED 

;; SETUP K1PAR7 FOR I/O 

;; SETUP KIPAR6 FOR TESTING. 

;; CATCH TIMEOUT IF NO SR3 

; .-ENABLE 22 BIT MODE 

.-.-THIS PDP-11 HAS A SR3 REGISTER 

;; CLEAN OFF IE STAC~NO SR3 

.-.-TURN ON MEMORY MANAGEMENT 

.-.-SET FOR TIME OUT 

.-.-TRAP ON NON-EX-MEM 

.-.-MAKE A IK STEP 

.-.-LAST ONE? 

;; NO—TRY IT 

.-.-GET LAST BANK+I 

.-.-TURN OFF MEMORY MANAGEMENT 

;.-KT11 NON-EXISTENT 
;;SET FOR TIMEOUT 
.-.-SET UP BANK 
;; INCREMENT BY IK 
;;1K STEP 

.-.-TRAP ON TIME OUT 
.-.•LAST ONE 
.-.-NO— TRY AGAIN 

.-.-DROP BACK 
;;SET FOR TIMEOUT 
; .-FIRST ADDRESS 

.-.-TEST AND STEP TO NEXT ADDRESS 
.-.-TRY ANOTHER 
.-.-DROP BACK 
.-.RESTORE THE STACK 
.-.-RESTORE ERROR VECTOR 

;;UST ADDRESS 
.-.-LAST BANK 
; .-RESTORE R3 
; .-RESTORE R2 
.-.-RESTORE R1 
.-.-RESTORE RO 

.-CLEAR THE ERROR REGISTER 

.-.-CONTAINS THE LAST ADDRESS 
.-.-CONTAINS THE LAST BANK 



COUNT PATTERN 



MEM MGMT PRT A 
ERRORS IN PAR'S 



MACRO Ml 113 
OR POP'S 



23-APR-81 13:32 PAGE 
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1691 

1692 

1693 

169A 

1695 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

1728 



003024 
003030 
003032 
003040 
003042 
003044 
003052 
003060 
003064 
003070 
003076 
003102 
003106 
003110 
003112 
003114 
003122 
003126 
003130 
003132 
003136 
003144 
003146 
003152 
003160 
003162 
003166 
003170 
003172 
003174 
003200 
003202 
003206 
003212 
003214 
003216 
003224 
003230 



005737 
001405 
022737 
001453 
000464 
012737 
012737 
017600 
012701 
012737 
005037 
005037 
005710 
005720 
077103 
012737 
005737 
001433 
011646 
062716 
012737 
000207 
062706 
012737 
011646 
062716 
000207 
005726 
010002 
050237 
005102 
040237 
005237 
000736 
005726 
012737 
062716 
000207 



001206 




TIMTST: 


TST 


$TMP4 








BEQ 


1$ 


000001 


001206 




CMP 


#1 .$TMP4 








BEQ 


5$ 








BR 


6S 


003106 


001110 


1$: 


MOV 


#2$,$LPERR 


003146 


000004 




MOV 


#4$, 4 


000000 






MOV 


aO(SP) ,R0 


000020 






MOV 


#20. R1 


1 77777 


001 320 




MOV 


#-1 ,ADRAND 


001316 




CLR 


ADDROR 


001274 






CLR 


TONUM 






2$: 


TST 


vRO) 






3$: 


TST 


(R0) + 








SOB 


Rl ,2$ 


003024 


001110 




MOV 


#TjMTST,$LPERR 


001274 






TST 


TONUM 






BEQ 


7$ 








MOV 


(SP) ,-(SP) 


0^ f% A A A V 

000006 






ADD 


Mo, (SP) 


000001 


001 206 




MOV 


#1 .$TMP4 








RTS 


PC 


000004 




4S: 


ADD 


#4,KSP 


000002 


001206 




MOV 


#2,$TMP4 








MOV 


(SP) ,-(SP) 


000002 






ADD 


02, (SP) 








RTS 


PC 






5$: 


TST 


(SP) + 








MOV 


RO, R2 


001316 






BIS 


R2, ADDROR 








COM 


R2 


001 320 






BiC 


Kc.ADKAND 


001274 






INC 


TONLM 








BR 


3$ 






6$: 


TST 


(SP) + 


003232 


000004 


7$: 


MOV 


#TIMERR,4 


000010 






ADD 


#10, (SP) 








RTS 


PC 



SEQUENCE 37 



SEE IF THIS IS AN ERROR RETURN 
BRANCH TO BEGIN IF NOT 
SEE IF THIS IS THE 1ST ERROR CALL RETURN 
GO CONTINUE AFTER 1ST ERROR CALL IF SO 
60 CONTINUE AFTER 2ND ERROR CALL IF NOT 
SET LOOP ON ERROR POINTER TO 2$ 
SET TIMEOUT VECTOR TO 4$ 
LOAD RO WITH ADDRESS OF FIRST REG 
LOAD Rl WITH LOOP COUNT (16) 
INITIALIZE "AND" OF ADDR. LOC 
INITIALIZE ' OR" OF ADR. LOC. 
INITIALIZE 'TIMEOUTS" COUNTER 
TRY ADDRESSING A REGISTER. TIMEOUTS TO 5$ 
PUT NEXT REGISTER ADDRESS IN RO 
LOOP BACK TO 2$ UNTIL ALL TESTED 
RESET LOOP ON ERROR POINTER TO TIMTST 
DID ANY OF THE REGISTERS TIME OUT? 
'BRANCH IF NOT 

•MOVE AN EXTRA RETURN PC ONTO STACK FOR POSSIBLE ERROR LOOP 
FUDGE RETURN TO CALL 2ND ERROR 
;MOVE 1ST ERROR FLAG TO $TMP4 
; RE TURN TO CALL ERROR 
; CLEAN UP THE STACK 
;MOVE 2ND ERROR FLAG TO $TMP4 

;MOVE AN EXTRA RETURN PC ONTO STACK FOR POSSIBLE ERROR LOOP 

;FUDGE RETURN FOR 1ST ERROR CALL IN TEST 

; RE TURN TO CALL 2ND ERROR 

;POP EXCESS RETURN OFF STACK - NO LOOP 

;LOAD THE ADDRESS THAT TIMED OUT INTO R2 

;'t)R" IT WITH OTHER ADDRS. THAT TIMED OUT 

r"ANO" IT WITH OTHER ADDRS. THAT TIMED OUT 

; INCREMENT THE TIMEOUT COUNTER 
;8RANCH BACK TO TEST THE NEXT REGISTER 
;POP EXCESS RETURN OFF STACK - NO LOOP 
;RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 
; FUDGE RETURN OVER BOTH ERROR CALLS 
;RETURN TO TEST 



CKKTABO 11/44 ntn m^i prt a 

CPU TRAP HANDLER ROUTINE 



1729 
1730 
1731 
1732 
1733 
173A 
1735 
1756 
1737 
1738 
1739 

1740 003232 005227 

1741 003234 -^77777 
y7U,2 003236 001401 
1743 003240 000000 
1744 

1745 
1746 
1747 

1748 003242 012637 

1749 003246 012637 

1750 003252 013737 

1751 003260 010637 

1752 003264 005737 

1753 003270 001404 

1754 003272 023737 

1755 003300 001401 

1756 003302 104001 

1757 003304 005037 

1758 003310 012737 

1759 003316 013746 

1760 003322 013746 

1761 003326 000006 
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SE 



.S8TTL CPU TRAP HANDLER ROUTINE 
*************************************************************** 

***** TRAP HANDLING ROUTINES •»»** 



THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 
'tRRVEC" (LOC. 004). IF THIS SUBROUTINE IS ENTERED BY A 
SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 
EXECUTED. 



001260 
001262 
177766 
001256 
001334 



001332 
001332 001334 



1 77766 
\77777 
001262 
001260 



003234 



• » 

TIMERR: 


INC 


(PC)* 


MAKE FLAG ZERO IF FIRST TIME THRU 
NEGATIVE ONE FOR HAVE ENTERED FLAG 


T IMF LG: 


.WORD 


-1 




BEQ 


1$ 


BRANCH IF FIRST TIME IN 

STOP! - I VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

nCrUKIiiMVJ 1 nc riftjl CnKUn. IMC 

•SECOND ENTRY ADDRESS SHOULD BE ON 
■THE KERNEL STACK. 




HALT 




1$: 


MOV 


(KSP)+,TRAPPC \ 


•SAVE PC+2 AT TIME OF ABORT 




MOV 


(KSP)+.TRAPPS 


■SAVE PS AT TIME OF ABORT 




MOV 


CPUERR.PCPUER 


;SAVE CPU ERROR REGISTER 




MOV 


KSP,WASR6 


;SAVE STACK POINTER VALUE 




TST 


CPUEXP 


■SEE IF ANY ERROR CONDITION WAS EXPECTED 




BEQ 


2S 


;BRANCH IF NO TRAP EXPECTED 




C/>¥=> 


PCPUER. CPUEXP 


;SEE IF EXPECTED CONDITION OCCURED 




BEQ 


3$ 


;BRANCH IF ERROR CODES MATCH 


2$: 


ERROR 


♦1 


; UNEXPECTED TRAP OR ABORT TO LOC. 4 


3$: 


CLR 


CPUERR 


; CLEAR CPU ERROR REGISTER 




MOV 


*-1,TIMFLG 


;MAKE FLAG NEGATIVE ONE FOR NEXT TIME 




MOV 


TRAPPS,-(KSP) 


;PUT PC Z PS OF TRAP ON STACK 




MOV 


TRAPPC,-(KSP) 






RTT 


.•RETURN FROM INTERRUPT OR ABORT 
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SEQUENCE 



1762 

Vf' 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 

1780 

1781 

1782 

1783 

1784 

1785 

1786 

1787 

1788 

1789 

1790 



003330 
003332 
003334 
003336 



003340 
003344 
003350 
003354 
003362 
003370 
003376 
003404 
003406 
003414 
003420 
003424 



005227 
}77777 
001401 
000000 



012637 
012637 
010637 
013737 
013737 
013737 
042737 
104002 
012737 
013746 
013746 
000006 



001260 
001262 
001256 
177572 
177574 
177576 
160000 

}77777 
001262 
001260 



S8r?L MEMORY MANAGEMENT TRAP HANDLER ROUTINE 

THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 
TRAPS AND ABORTS THRU 'WMVEC" (LOC. 250). IF THIS SUBROUTINE JS 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED. A 
HALT IS EXECUTED. 

'AAAAAAAAAAAAAAAAAAAAAAtAVAAAAAAAAAAAA-V********* **************** 



MGMERR: INC 
MWFLG: .WORD 
BEQ 
HALT 



1$: 



001264 
001266 
001270 
1 77S72 

003332 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

ERROR 

MOV 

MOV 

MOV 

RTT 



-1 
1$ 



(KSP>+.TRAPPC 
(KSP>+,TRAPPS 
KSP,WASR6 
SRO.WASSRO 
SRI .UASSRl 
SR2,WASSR2 
#1 60000. SRO 
+2 

,MGMFLG 
TRAPPS,-(KSP) 
TRAPPC,-(ICSP) 



MAKE FLAG ZERO IF FIRST TIME THRU 

NEGATIVE ONE FOR '>MVE ENTERED" FLAG 

BRANCH IF FIRST TIME IN 

STOP! - I'VE ENTERED THIS ROUTINE 

A SECOND TIME BEFORE I FINISHED 

REPORTING THE FIRST ERROR. THE 

SECOND ENTRY ADDRESS SHOULD BE ON 

THE KERNEL STACK. 

SAVE PC+2 AT TIME OF ABORT 

SAVE PS AT TIME OF ABORT 

SAVE STACK POINTER VALUE 

SAVE CONTENTS OF KT STATUS REG. 0 

SAVE CONTENTS OF KT STATUS REG. 1 

SAVE CONTENTS OF KT STATUS REG. 2 

CLEAR ERROR BITS IN STATUS REG 0 

UNEXPECTED TRAP OR ABORT TO LOC. 250 

MAKE FLAG NEGATIVE ONE FOR NEXT TIME 

PUT PC t PS OF TRAP ON STACK 

.RETURN FROM INTERRUPT OR ABORT. 



i 

I 



4 
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B 

32 



SEUUfNCf 



1791 

1792 

1793 

179< 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1802 

1805 

180A 

1805 

1806 

180/' 

1808 

1809 

1810 

1811 

1812 

1813 

18K 

1815 

1816 

1817 

1818 

18^9 

1820 

1821 

1822 

1823 

182A 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 



S8TTL CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 

THIS SUBROUTINE IS USED TO FORfl AN 22-BlJ PHYSICAL ADDRESS 
(PBA) FROM THE 16-81 T VIRTUAL ADDRESS (VBA) AND THE APPROPRIATE 
PAGE ADDRESS REGISTER (PAR). THE SAWE METHOD USED BY THE MEMORY 
MANAGEMENT LOGIC IS USED. VBA <15:13> SELECTS WHICH PAR/PDR 
IS TO BE USED, VBA <5:0>*PBA <5:0>, AND VBA <12:6> IS ADDED 
TO PAR <15:00> TO GIVE P8A <21:6>. BITS <21:16> OF THE 
PHYSICAL ADDRESS ARE LEFT IN LOC. "TBAHI" AND BITS <15:00> 
ARE LEFT IN LOC. "PBALO". THE PSWS "CURRENT MODE" BITS 
ARE USED TO SELECT THE KERNEL, SUPERVISOR OR USER PAR/PDR'S. 
THE ROUTINE IS ENTERED WITH LOC. 'VIRTV CONTAINING THE 16-811 
VIRTUAL ADDRESS. 



003A26 


012702 


172340 




FORMPA: 


MOV 


005A32 


032737 


140000 


1 77776 




BJT 


0C5A40 


00U03 








BEQ 


005AA2 


012702 


177640 






MOV 


003AA6 


000406 








BR 


003A50 


032737 


040000 


177776 


1$: 


BIT 


005A56 


001402 








BEQ 


003A60 


012702 


1 72240 






MOV 


003A64 


013700 


001276 




2$: 


MOV 


OO5A70 


072027 


177764 






ASH 


003A7A 


04270C 


177761 






BIC 


003500 


060002 








ADD 


003502 


011200 








MOV 


00350A 


010002 








MOV 


003506 


013737 


001276 


001302 




MOV 


0035U 


042737 


160000 


001302 




BIC 


003522 


072227 


177766 






ASH 


003526 


042702 


1 7777^, 






BIC 


003532 


072027 


000006 






ASH 


003536 


042700 


000077 






BIC 


003542 


060037 


001302 






ADD 


003546 


005502 








ADC 


003550 


010237 


001304 






MOV 


OC3554 


000207 








RTS 



#KIPAR0,R2 
#1 40000. PSW 
1$ 

*UIPAR0.R2 
2$ 

#40000. PSW 
2$ 

#SIPAR0,R2 

VIRTI.RO 

*-U,RO 

*1 77761.ro 

R0,R2 

(R2) ,R0 

R0,R2 

VIRT1. PBALO 

#160000. PBALO 

*-12,R2 

*1 77^74. R2 

#6.R0 

#77. RO 

R0.P8AL0 

R2 

R2.P8AHI 
PC 



LOAD ADDRESS OF FIRST KERNEL PAR IN R2 
IN USER MODE? 
BRANCH IF NO 

LOAD ADDRESS OF FIRST USER PAR IN R2 
BRANCH WHEN DONE 
IN SUPERVISOR MODE? 
BRANCH IF NO 

LOAD ADDRESS OF FIRST SUPERVISOR PAR IN R2 

LOAD VIRTUAL ADDR. (VBA) INTO RO 

GET BITS <15:13> DOWN TO BITS <3:1> 

MASK OF ALL BITS BUT BITS <3:1> 

ADD OFFSET TO BASE PAR ADDRESS 

GET BITS <15:00> FROM APPROPRIATE PAR 

COPY PAR BITS <15:00> INTO R2 

PUT VIRTUAL ADDR. IN LOC. 'PBALO" 

CLEAR OFF BITS <15:13> OF ORIGINAL VBA 

GET PAR <15:00> DOWN TO BITS <1:0> OF R2 

CLEAR OFF ALL BITS BUT BITS <1 :0> 

SHIFT PAR<9:0> TO <15:6> OF RO 

CLEAR BITS <5:0> OF RO 

IN EFFECT. ADD V8A<12:0> TO PAR<9:0> 

(PAR<9:0> IN BITS <15:6> OF RO) 

ADD ANY CARRY TO R2 

PUT BITS <21:16> OF PHYSICAL ADDR. IN PBAHI 
RETURN TO PROGRAM 



CKKTABO 11/44 P«M MOIT PRT A 
WE -01 AGNOSTIC SETUP 



1833 
1834 
1835 
1836 
1837 

1838 020000 



HACRO nil 13 



020000 
020004 
020006 
020012 
020014 

020020 
020026 
020034 
020042 
020050 
020056 
020064 
020072 
020100 
020106 
020112 



020120 
020126 
020134 
020142 
020150 
020152 
020156 
020160 
020166 
020170 
020174 
020202 
020206 
020214 



020222 
020226 
020234 
020242 
020250 
020256 

020260 
020262 
020266 
020270 
020276 
020304 
020310 



020000 



012706 
005026 
022706 
001374 
012706 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
013737 
005037 
112737 



012737 
012737 
012737 
012737 
005046 
012746 
000006 
012737 
000402 
062706 
012737 
005037 
012737 
012737 



013746 
012737 
012737 
012737 
022777 
001012 

000403 
012716 
000002 
012737 
012737 
012637 
005037 



001100 

001140 

001100 

033020 
000340 
033246 
000340 
037144 
000340 
037232 
000340 
032570 
001212 
000001 



033006 
000340 
000002 
020170 

020160 



000010 
000012 
001346 
020206 
020214 



000004 

020262 
177570 
) 77570 
1 77777 



020270 

000176 
000174 
000004 
001232 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
032562 

001115 



000014 
000016 
033006 
000010 



000010 

001106 
001110 



000004 
001140 
001142 
160662 



001140 
001142 



C 4 
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.S8TTL PRE-DIAGNOSTIC SETUP 



SEQUENCE 



41 



STARTING ADDRESS IS 200 



START: 
.S8TTL 



.=20000 



INITIALIZE THE COmON TAGS 
;; CLEAR THE COMMON TAGS (SCHTAG) AREA 

ncniAQ.Rb ;;FIRST LOCATION TO BE TLEARED 

(R6)* ;; CLEAR MEMORY LOCATION 

*SyR,R6 ;;DONE? 

.-6 ;;LOOP BACK IF NO 

#STACK,SP ; .SETUP THE STACK POINTER 

FEU VECTORS 

#$SCOPE,a«IOTVEC ::IOT VECTOR FOR SCOPE ROL'TINE 
#340,airiOTVEC+2 ; .-LEVEL 7 

#$ERR0R.ar£MTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
*340.a*E«TVEC+2 ;;LEVEL 7 

/rSTRAP.arTRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
*340,arTRAPVEC+2; LEVEL 7 
4rSPURDN.arPURVEC ; .-POWER FAILURE VECTOR 
<'340.a*PWRVEC+2 ;. -LEVEL 7 

$ENDCT.$EOPCT ; .-SETUP ENO-OF -PROGRAM COUNTER 
SESCAPE .-.-CLEAR THE ESCAPE ON ERROR ADDRESS 

#1.SERMAX .-.-ALLOW ONE ERROR PER TEST 

.-.-INITIALIZE THE "T-eiT" TRAP VECTOR. THEN LOAD LOCATION 'tRTRN*'. IN 
.-.-THE "END-OF-PASS" ($EOP) ROUTINE. WITH A 'T?TI" OR '^^TT". 



MOV 
CLR 
CMP 
BNE 
MOV 

.-.-INITIALIZE A 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
MOVB 



000006 033006 641: 



65 1: 
66S: 



MOV 
MOV 
MOV 
MOV 

CLR 

MOV 

RTT 

MOV 

BR 

ADD 

MOV 

CLR 

MOV 

MOV 



#$RTRN.a»T8ITVEC .-.-SET '7" BIT VECTOR TO JRTRN 
#340.arTBITVEC+2 ; .-LEVEL 7 



«RTI.$RTRN 
4r65$.»rRESVEC 

-(SP) 

*64$. -(SP> 

#RTT.SRTRN 
66S 

#10. SP .-;RTT ILLEGAL— CLEAN OFF THE STACK 
#RESVEC*2,a#RESVEC ; .RESTORE TRAP CATCHER 

STBIT ;; CLEAR '7" BIT SWITCH 

#..SLPADR ;; INITIALIZE THE LOOP ADDRESS FOR SCOPE 

*..$LPERR .-.SETUP THE ERROR LOOP ADDRESS 



;;SET SRTRN TO A RTI 
.-.-TRY TO DO A RTT 
;.-DlWMY PS 
;;AND PC 
- * TRY THE RTT 

;;RTT IS LEGAL— SET SRTRN TO A RTT 



.-.-SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 



.-.-EQUAL TO A 
MOV 
MOV 
MOV 
MOV 
CMP 
BNE 



•-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 



67S 
68S 
69S 



BR 

MOV 

RTI 

MOV 

MOV 

MOV 

CLR 



a«RRVEC, -(SP) 
#67$.airERRVEC 
fDSWR.SWR 
«>DISP, DISPLAY 

#-1 ,aswR 
69S 

68$ 

#68$, (SP) 

#SWREG.SWR 
fDISPREG. DISPLAY 
(SP)-^, a#ERRVEC 
$PASS 



SAVE ERROR VECTOR 
SET UP ERROR VECTOR 
SETUP FOR A HARDWARE SWICH REGISTER 
AND A HARDWARE DISPLAY REGISTER 
TRY TO REFERENCE HARDWARE SWR 
BRANCH IF NO TIMEOUT TRAP OCCURRED 
AM) THE HARDWARE SWR IS NOT = -1 
BRANCH IF NO TIMEOUT 
SET UP FOR TRAP RETURN 

POINT TO SOFTWARE SWR 

RESTORE ERROR VECTOR 
CLEAR PASS COUNT 



CKKTABO mew mgmt prt a 

INITIALIZE THE COMMON TAGS 
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SEQUENCE 





02031 A 


MZ75f 


AAAOAA 

OOOcOO 


AA1 0/.C 




020322 


AA^ / AT 

001 403 








02032A 


A1 07T7 

012or^ 


AA1 oy ^ 
001 c4o 


AA1 1 / A 

001 IsU 




020332 








1839 












020332 


AAC 007 


1 77777 
\fffff 






0<:Ojjo 


AA1 A/ ^ 

00 iU*»o 










A007T7 
\JCCfif 


t\1'i'TI 0 


r\/v\f\j o 




0c034o 


AA1 / / O 

00 14«»£ 








A1ATCA 

020530 


i A/ / A1 

104«»01 


OcO*» 1 0 






AOATC/ 

0c035«» 


AAC777 


AnAA/.0 






O^UjoO 


AA1 A1 0 








AO ATX. 5 


1 07757 
ICif CI 


OA1 OAA 

UOl 


nnnnm 

UUUUU 1 






UUI*»UO 








020372 


021727 


001140 


000176 




020400 


001005 










1 \JHH\Jf 








A"»A/.A/. 


0UU*»U3 








AOA/ A^ 


1 1 07T7 


A AAA A 1 


Am 1 7^ 




AOA/ 1 Z. 

UcO<» 










0c0h1*» 


nnn/ i 7 
OOU«i 1 f 








AOA/ 










A OA/ 












u 1 cfyjo 


UU 1 1 uu 






AOA/.^tA 


A1 07T7 




AAAAA/. 


10*13 




A1 0777 










A1 0777 


rtft777n 


AAAOCA 




AOA5AO 


A1 0777 


vWjhw 






A0AC1 A 


A1 07Aft 


1 77777 

\ f f f f f 




1 B/ 7 


AOA^ 1/. 


A1 AA77 

Ul Wj' 


AA707A 




1 B/.S 


AOAQOA 


A1/VI77 


nfl7770 




1 o*#^ 




v 1 C ' J' 


0007^0 


001 ?72 


1850 


020532 


005037 


y77572 




1851 


020536 


005037 


172516 




1852 


020542 


005037 


^777b6 




1853 


020546 


052737 


000200 


002512 


1854 


020554 


004737 


002454 




1855 


020560 


005037 


-[777(36 





70$: 
.S8TTL 
;;TYPE 



8ITB #APTSIZE.$ENVM 

BEQ 70$ 

MOV #$SUREG,SWR 



.TEST USER SIZE UNDER APT 
; YES, USE NON-APT SWITCH 
;NO,USE APT SWITCH REGISTER 



TYPE PROGRAM NAME 
THE NAME OF THE PROGRAM 



73$: 
74$: 

;;72$: 

71$: 

LOOP: 



INC 
BNE 
CMP 
BEQ 
TYPE 



IF FIRST PASS 
FIRST TIME? 
BRANCH IF NO 
ACT-11? 
BRANCH IF YES 
TYPE ASCIZ STRING 
.S8TTL GET VALUE FOR SOFTWARE SWITCH REGISTER 

ARE WE RUNNING UNDER XXOP/ACT? 
BRANCH IF YES 
ARE WE RUNNING UNDER APT? 
BRANCH IF YES 

SOFTWARE SWITCH REG SELECTED? 
BRANCH IF NO 
GET SOFT-SWR SETTINGS 



TST 
BNE 
CMPB 
BEQ 
CMP 
BNE 
GTSWR 
BR 

MOVB 



#-1 
71$ 

nENDAD,»r42 
71$ 
s72l 



a«42 
73$ 
$ENV,/rl 
73$ 

SWR,/rSWREG 
74$ 



74$ 

»^ ,$AUTOB 



:;SET AUTO-MODE INDICATOR 



BR 

.ASCIZ 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
CLR 
BIS 
JSR 
CLR 



71$ ;;GET OVER THE ASCIZ 

<CRLF>#CICICTAB 11/44 MEM MGMT PRT A#<CRLF> 



#STACK,KSP 

#TIMERR,ERRVEC 

#340,ERRVEC+2 

^MGMERR.MMVEC 

*340,MnVEC+2 

0-^ .no 

R0.TIMFL6 

RO.MGMFLG 

*340.TBITPS 

MMRO 

MMR3 

CPUERR 

#8IT7,$KT11 

PC.$SIZE 

CPUERR 



INITIALIZE THE STACK POINTER 

LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

LOAD MEMORY MANA6ENT ROUTINE INTO VECTOR 

SET NEW PS TO PRIORITY LEVEL 7-KERNEL 

PUT -1 INTO RO TO INITIALIZE FLAGS 

INITIALIZE CPU ERROR FLAG 

INITIALIZE MEMORY MANAGEMENT ERROR FLAG 

INITIALIZE LOG THAT HOLDS T-filT PSW 

BE SURE MEM. MGMT IS OFF TO START WITH 

MAKE SURE ALL MAPPING IS OFF 

MAKE SURE CPU ERROR REG. IS CLEAR 

SET M.M. FLAG FOR SIZING ROUTINE 

RUN SIZING ROUTINE 

CLEAR CPU ERROR REG. AFTER SIZING 



CICtfTABO 11/^;^ MEM MGMT PRT A 
ADDRESS AND DATA PATHS TESTS 

1856 
1857 
1858 
1859 



E 4 
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SEQUENCE 



.S8TTL ADDRESS AND DATA PATHS TESTS 

GROUP 1 ADDRESS AND DATA PATHS TESTS 



CKKTABO n/44 MEM MGMT PRT A MACRO Mil 13 23-APR-81 13:32 PAGE 
TEST # 1 - PSW PRIORITY BIT TEST 



F 

35 



SEQUENCE 



1866 



02036^ 

1867 020566 

1868 020S7A 

1869 020576 

1870 020600 

1871 020604 

1872 020610 

1873 0206U 

1874 020616 

1875 020620 
1876 

1877 
1878 

1879 020622 

1880 020626 

1881 020632 

1882 020634 



000004 
012737 
005000 
005001 
010037 
013701 
042701 
020001 
001401 
104003 



S8TTL TEST # 1 - PSW PRIORITY BIT TEST 
1 PSW PRIORITY BIT TEST 



020576 001110 



177776 
177776 
177437 



.••TEST 
• • 

■ ■••••* 

tSTI: 
If : 

2S: 



THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <7:5> 'VRICRIU BITS" 
TO SEE THAT SOME OF THE BASIC "DATA PATH" LOGIC IS WORKING. 

********************************************************** 



062700 000040 

022700 000400 
001361 

012737 020566 001110 



3$: 



SCOPE 

MOV 

CLR 

CLR 

MOV 

MOV 

BIC 

CMP 

BEO 

ERROR 



ADD 
CMP 
BNF 
MOV 



*2$,$LPERR 

RO 
R1 

RO,PSW 

PSW,R1 

#1 77437. R1 

R0.R1 

3S 

+3 



*40.R0 

*400.R0 

2$ 

*1$.SLPERR 



SET LOOP ON ERROR POINTER TO 2$ 
INITIALIZE RO WITH PRIORITY=0 DATA 
PREPARE R1 TO ACCEPT DATA READ 
WRITE PRIORITY BITS IN THE PSW 
READ BACK THE LOW BYTE OF PSW 
MASK OFF EVERYTHING EXCEPT PRIORITY BITS 
WAS CORRECT PRIORITY SET IN THE PSW? 
BRANCH IF YES 

PRIORITY BITS SET WRONG IN PSW 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 2$" = 000770 

CHANGE DATA TO NEXT PRIORITY 

HAVE PRIORITIES 0-7 ALL BEEN CHECKED' 

BRANCH IF NO 

RESET LOOP ON ERROR POINTER TO IS 



CKKTABO n/44 MEM W/IT PRT A 
TEST # 2 - PSW MODE BJT TEST 

1888 



G 4 



1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 



020642 
020644 
020652 
020654 
020660 
020664 
020670 
020674 
020676 
020700 
020704 



020706 
020712 
020714 
020722 



000004 
012737 
005000 
005037 
050037 
013701 
042701 
020001 
001403 
005037 
104004 



062700 
001360 
012737 
005037 



010000 

020644 
1 7777b 
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S8TTL TEST # 2 - PSW MODE BIT TEST 



SEQUENCE 



020654 001110 

1 7777 t 
y7777b 
y7777b 
007777 



1 77776 



•TEST 2 PSW MODE BIT TEST 

• THIS TEST READS AND WRITES THE PROCESSOR STATUS WORD <15:12> 'WDE BITS" 

• TO FURTHER CHECK THE BASIC CPU DATA PATHS 
• 

**************************************************************** 

tST2: 
1$: 



2$: 



SCOPE 






MOV 


#2$.$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


CLR 


RO 


INITIALIZE RO WITH MODE BITS = 0000 


CLR 


PSW 


INITIALIZE PSW 


BIS 


RO.PSW 


BIT SET THE PSW MODE BITS WITH RO 


MOV 


PSW,R1 


READ BACK THE CONTENTS OF THE PSW 


BIC 


0007777. Rl 


MASK OFF EVERYTHING EXCEPT THE MODE 


CMP 


R0.R1 


WERE THE MODE BITS SET CORRECTLY? 


BEQ 


3$ 


•BRANCH IF YES 


CLR 


PSW 


•CLEAR PSW FOR ERROR REPORT 


ERROR 


♦4 


•MODE BITS SET WRONG IN PSW 



3$: 



001110 



ADD 
BNE 
MOV 

CLR 



#10000.R0 
2S 

*1$.$LPERR 
PSW 



FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2S" = 000763 
CHANGE MODE BIT DATA 
BRANCH IF STILL MORE COMBINATIONS 
RESET LOOP ON ERROR POINTER TO 1$ 
RESET PSW BEFORE LEAVING 
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SEQUENCE 



1913 



19K 
1915 
1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
192A 
1925 
1926 
1927 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
1936 
1937 
1938 
1939 

mo 

1941 



020726 
020730 
020736 
020742 
020746 
020752 
020756 
020762 
020764 
020766 
020770 
020774 



020776 
021004 
021010 
021014 
021020 
021024 
021030 
021032 
021034 
021040 



012737 
005037 
012700 
110037 
013701 
042701 
020001 
001403 
005037 
104005 



S8TTL TEST # 3 - BYTE ADDRESSING TEST FOR PSW 



•TEST 3 BYTE ADDRESSING TEST FOR PSW 

* 

• THIS TEST WRITES THE HIGH AND LOW BYTES OF THE PROCESSOR STATUS WORD 

• AND READS THEM BACK TO BE SURE THEY CAN BE WRITTEN INDEPENDENTLY. 

• THIS CHECKS THE PSW PORTION OF THE ADDRESS DETECTION LOGIC. 



000004 




TST3: 


SCOPE 






012737 


020736 001110 


1$: 


MOV 


#2$.$LPERR 


SET LOOP ON ERROR POINTER TO 2$ 


005037 


177776 


2$: 


CLR 


PSW 


CLEAR THE PSW 


012700 


000360 




MOV 


ir360.R0 


PUT THE HIGH BYTE DATA INTO RO 


110037 


177777 




M0V8 


R0.PSW*1 


•WRITE THE HIGH BYTE OF THE PSW 


013701 


^77776 




MOV 


PS W,R1 


•READ BACK THE ENTIRE PSW 


042701 


007437 




SIC 


#007437, R1 


MASK OFF THE T 6 CC BITS 


000300 






SWAB 


RO 


•GET DATA WRITTEN IN HIGH BYTE OF RO 


020001 






CMP 


RO.Rl 


WAS THE PSW WRITTEN TO CORRECTLY 


001403 






BEQ 


3S 


■BRANCH IF YES 


005037 


177776 




CLR 


PSW 


•CLEAR PSW FOR ERROR REPORT 


104005 






ERROR 


♦5 


•LOW BYTE EFFECTED BY WRITE TO HIGH BYTE 



021004 
177776 
000340 
177776 
177776 
007437 



1 77776 



001110 



3$: 
4S: 



021042 012737 020730 001110 5$: 



MOV 

CLR 

MOV 

MOVB 

MOV 

BIC 

CMP 

BEQ 

CLR 

ERROR 



MOV 



#4$.$LPERR 

PSW 

#340. RO 

RO.PSW 

PSW,R1 

#007437, R1 

RO.Rl 

5$ 

PSW 

♦5 



#1$.$LPERR 



FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000760 
SET LOOP ON ERROR POINTER TO 4$ 
CLEAR THE PSW 

PUT THE LOW BYTE DATA INTO RO 

WRITE THE LOW BYTE OF THE PSW 

READ BACK THE ENTIRE PSW 

MASK OFF THE TftCC BITS 

WAS PSW WRITTEN TO CORRECTLY 

BRANCH IF YES 

CLEAR PSW FOR ERROR REPORT 

HIGH BYTE EFFECTED BY WRITE TO LOW BYTE OF PSW 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 2$" = 000736 

RESET LOOP ON ERROR POINTER TO 1$ 
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SEQUENCE 47 



1953 





021050 


000004 




1954 


021052 


005037 


}77572 


1955 


021056 


005037 


177776 


1956 


021062 


012706 


001100 


1957 


021066 


012737 


040000 


1958 


021074 
021100 
021106 


012706 


000700 


1959 


012737 


140000 


1960 


012706 


000600 


1961 


021112 


005037 


1 77776 


1962 


021116 


022706 


001100 


1963 


021122 


000404 




1964 


021124 


012700 


001100 


1965 


021130 


010601 




1966 


021132 


104006 




1967 








1968 








1969 








1970 


021134 


012737 


021134 


1971 


021142 


005037 


1 77776 


1972 


021146 


012746 


1 77777 


1973 


021 1 52 


012737 


040000 


1974 


021160 


012746 


000001 


1975 


021164 


012737 


140000 


1976 


021172 


005046 




1977 


021174 


012737 


100000 


1978 


021202 


011600 




1979 


021204 


001401 




1980 


021206 


104040 




1981 


021210 


005037 


177776 


1982 








1983 








1984 








1985 








1986 








1987 








1988 








1989 








1990 








1991 








1992 








1993 








1994 









S8TTL TEST # 4 - TEST AND SETUP OF STACK POINTERS 

'test 4 TEST AND SETUP OF STACK POINTERS 

THIS TEST SETS THE USER AND KERNEL STACK POINTERS FOR THE 

REST OF THE PROGRAM AND MAKES SURE THEY ARE INDEPENDENT OF 

EACH OTHER. KERNEL R6 IS SET TO 1 100. SUPERVISOR R6 IS SET TO 700. 

USER R6 IS SET TO 600. THEN KERNEL R6 IS READ TO BE SURE 

IT'S STILL 1100. THE SECOND PART OF THE TEST CHECKS TO SEE 

THAT THE IL..EGAL MOOECIO") STACK POINTER IS MAPPED TO THE 

USER STACK f»OINTER, WITH MEMORY MANAGEMENT OFF. 

*************************************************************** 



TST4; 



1 77776 
1 77776 



001110 1$: 

177776 
177776 
177776 

2$: 



SCOPE 

CLR 

CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

CMP 

BR 

MOV 

MOV 

ERROR 



MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
CLR 

nov 

MOV 
BEO 
ERROR 
CLR 



MMRO 
PSW 

/TKERSTK.KSP 
#40000. PSW 
#SUPSTK.SSP 
*U0000.PSW 
/ruSESTK.USP 
PSW 

#KERSTK.KSP 
1S 

#KERSTK.R0 

KSP.Rl 

♦6 



*1$,$LPERR 
PSW 

/r-l.-(KSP) 

#40000. PSW 

#1.-(SSP) 

#140000. PSW 

-CUSP) 

#100000.PSW 

(SP) ,R0 

2$ 

♦40 

PSW 



MAKE SURE M.M. IS OFF 

GO TO KERNEL MODE 

SET KERNEL STACK POINTER TO 1100 

GO TO SUPERVISOR MODE 

SET SUPERVISOR STACK POINTER TO 700 

GO TO USER MODE 

SET USER STACK POINTER TO 600 

BACK TO KERNEL MODE 

IS KERNEL R6 STILL 1100? 

BRANCH TO NEXT PART OF TEST 

SAVE DATA WRITTEN FOR ERROR REPORT 

SAVE DATA READ AFTER USER R6 WAS WRITTEN 

KERNEL R6 CHANGED BY WRITING USER R6 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

000756 

SET LOOP ON ERROR POINTER TO 1$ 

GO TO KERNAL MODE 

PUSH A -1 ONTO STACK 

GO TO SUPERVISOR MODE 

PUSH A 1 ONTO THE STACK 

GO TO USER MODE 

PUSH A ZERO ONTO THE STACK 

PUT ILLEGAL MODE IN PSW 

PUT TOP OF STACK INTO RO 

WE'RE OK-60 TO NEXT TEST. JUMP OVER ERROR PRINT OUT 
ILLEGAL MODE NOT MAPPED TO USER MODE 
RESET PSW TO KERNEL BEFORE LEAVING 



THE NEXT SEVEN (7) TESTS WILL TRY TO ADDRESS ALL OF THE 
MEMORY MANAGEMENT REGISTERS (SR0->SR3; IftD SPACE KERNEL. 
SUPERVISOR t USER PAR/PDR'S). 

EVERY TIME A REGISTER TIMES OUT ITS ADDRESS WILL BE REPORTED. 
AT THE END OF EACH TEST A SUWARY OF THE ADDRESSES THAT TIMED 
OUT DURING THAT TEST IS GIVEN. THE RESULTS OF "AND-ING" AND 'DR-ING" 
THEIR ADDRESSES IS GIVEN TO SHOW WHICH ADDRESS LINES MAY BE 
STUCK AT 0 OR 1. THE PAR/PDR ADDRESS AND KT MUX'S ARE THE 
THINGS BEING CHECKED. 



J A 
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TEST # 5 - SR0.SR1,SR2,SR3 TIMEOUT TEST 



SEQUENCE 



2002 



2003 
?00A 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
201A 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 
2033 
2034 
2035 



0212U 
021216 
021222 
021230 
021236 
021 2A2 
021 2A6 
021 25A 
021260 
021264 

021266 
021272 
021274 
021300 
021302 
021310 
021314 
021316 
021320 
021326 
021330 
021334 



021336 
021340 
021344 
021346 
021352 
021356 
021362 
021364 



000004 
005037 
012737 
012737 
012700 
012701 
012737 
005037 
005037 
005710 

062700 
077104 
012700 
005710 
012737 
005737 
001401 
104010 
012737 
000417 
062706 
104007 



010002 
050237 
005102 
040237 
005237 
032700 
001347 
000740 



1 77776 
021264 
021330 
^77572 
000003 
1 77777 
001316 
001 ?74 



000002 

172516 

021222 
001274 



S8TTL TEST MS- SR0.SR1 .Sfi2.SR3 TIMEOUT TEST 
'test 5 SR0.SR1.SR2.SR3 TIMEOUT TEST 



001320 
001274 
172516 



001110 
000004 



001320 



TST5: 
1$: 



2S: 
3$: 



001110 4S: 



003232 000004 5$: 
000004 6S: 



001 "^16 



THIS TEST ADDRESSES THE MEMORY MANAGEMENT STATUS REGISTERS 
0J.2. AND 3. DATA WILL BE WRITTEN OR READ FROM THESE REGISTERS 
IN LATER TESTS. THIS TEST JUST CHECKS FOR A RESPONSE. 



SCOPE 

CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 

CLR 

TST 

ADD 

SOB 

MOV 

TST 

MOV 

TST 

BEQ 

ERROR 

MOV 

BR 

ADD 

ERROR 



MOV 
BIS 
COM 
BIC 
INC 
BIT 
BNE 
BR 



PSW 

#2$.$LPERR 
#6$, 4 
#SRO,RO 
#3.R1 

#-1 .ADRAND 
ADDROR 
TONLW 
(RO) 

#2.R0 
R1.2$ 
#SR3,R0 

(RO) 

JTU^SLPERR 

TONUi 

5S 

♦10 

#TIMERR.4 
TST6 
#4.KSP 
*7 



R0.R2 

R2.ADDR0i< 

R2 

R2, ADRAND 

TONUM 

#SR3,R0 

4S 

3S 



MAKE SURE KERNAL MODE IS SELECTED 

SET LOOP ON ERROR POINTER TO 2$ 

SET TIMEOUT VECTOR TO 6f 

LOAD RO WITH ADDRESS OF FIRST REG. 

LOAD R1 WITH THE LOOP COUNT 

INITIALIZE "AND" OF ADDRS. LOC. 

INITIALIZE "DR" OF ADDRS. LOC. 

INITIALIZE "TIMEOUTS" COUNTER 

TRY ADDRESSING A STATUS REGISTER 

IF IT TIMES OUT GO TO 6S 

PUT NEXT ADDRESS IN RO 

LOOP BACK TO 2S UNTIL ALL TESTED 

LOAD RO WITH THE ADDRESS OF SR3 

TRY ADDRESSING SR3 

RESET LOOP ON ERROR POINTER TO 1$ 

DID ANY OF THE STATUS RE6.S TIMEOUT? 

BRANCH IF NO 

SUMMARY OF STATUS REG. TIMEOUTS 

RESTORE NORMAL CPU TRAP ROUTINE ADDRESS 

;G0 TO NEXT TEST 

CLEAN UP THE STACK 

ONE OF THE STATUS REGS. TIMED OUT 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 2$" = 000756 

LOAD THE ADDRESS THAT TIMED OUT INTO R2 
•W IT WITH OTHER ADDRS. THAT TIMED OUT 
"AND" IT WITH OTHER ADDRS. THAT TIMED OUT 

INCREMENT THE TIMEOUT COUNTER 
TEST FOR LAST REGISTER 
SR3 IS LAST;GO TO FINAL ERROR REPORT 
BRANCH BACK TO TEST THE NEXT ADDR. 
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bEOUfcNCE 49 



2039 



021366 OOOOOA 



2040 021370 

2041 021374 

2042 021376 
2043 

2044 

2045 0?1400 

2046 021402 



004737 
172340 
104007 



000773 
104010 



S8TTL TEST * 6 - KERNEL liD SPACE PAR'S TIMEOUT TEST 
•*•••************»•*********•»•*•************•*••••••••••••*•••• 

'test 6 KERNEL ItD SPACE PAR'S TJMEOUT TEST 

THIS TEST ADDRESSES THE SIXTEEN (16) KERNEL PAGE ADDRESS 

REGISTERS 0(JPARO>KIPAR7 AND KDPAR0-KDPAR7) 

AND CHECKS THAT SOMETHING RESPONDS TO THEIR ADDRESSES. 



003024 



TST6: 
1$: 



SCOPE 
JSR 
.WORD 
ERROR 



BR 

ERROR 



PCTIMTST 

KIPARO 

+7 



1$ 
♦ 10 



GO DO THE TEST ON PAGE OF THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR - ONE OF THE REGISTERS 
TIMED OUT. FOR TIGHTER SCOPE LOOP, REPLACE THE 
'MOV *1,$TMP4' INSTRUCTION IN THE SUBROUTINE WITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR - SUMMARY OF REG TIMEOUTS 
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TEST # 7 - KERNEL ItO SPACE PDR'S TIMEOUT TEST 



SEQUENCE 50 



2050 



02K0A 000004 

2051 02K06 004737 00302A 

2052 02H12 1 72300 

2053 02KU 104007 
2054 

2055 

2056 021416 000773 

2057 021420 104010 



.S8TTL TEST # 7 - KERNEL ItD SPACE PDR'S TIMEOUT TEST 

iTEST 7 KERNEL I&O SPACE PDR'S TIMEOUT TEST 

• THIS TEST ADDRESSES THE SIXTEEN (16) KERNEL PAGE DFSCRIPTOR 

• REGISTERS (KIPAR0-KIPAR7 AND KDPAR0-KDPAfi7) 

• AND CHECKS THAT SOMETHING RESPONDS TO THEIR ADDRESSES. 



TST7: SCOPE 

1$; JSR PCTIMTST 

.WORD KJPDRO 

ERROR +7 



BR IS 

ERROR +10 



GO DO THE TEST ON PAGE OF THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR > ONE OF THE REGISTERS 
TIMED OUT. FOR TIHGTER SCOPE LOOP. REPLACE THE 
•MOV *1,$TMP4' INSTRUCTION IN THE SUBROUTINE WITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR - SUMMARY OF REG TIMEOUTS 
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SEQUENCE 51 



2061 



.S8TTL TEST # 10 - SUPERVISOR I&D SPACE PAR'S TIMEOUT TEST 

iTEST 10 SUPERVISOR IU> SPACE PAR'S TIMEOUT TEST 

* THIS TEST ADDRESSES THE SIXTEEN (16) SUPERVISOR PAGE ADDRESS 

* REGISTERS (SIPAR0-SIPAR7 AM) SDPAR0-SDPAR7) 

* AND CHECKS THAT SOMETHING RESPO^a>S TO THEIR ADDRESSES. 



021422 

2062 021424 

2063 021430 

2064 021432 
2065 

2066 

2067 021434 

2068 021436 



000004 
004737 
172240 
104007 



000773 
104010 



003024 



TST10: 
1$: 



SCOPE 
JSR 
.WORD 
ERROR 



BR 

ERROR 



PCTIMTST 

SIPARO 

+7 



IS 

♦ 10 



GO DO THE TEST ON PAGE OF THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR - ONE OF THE REGISTERS 
TIMED OUT. FOR TIHGTER SCOPS LOOP, REPLACE THE 
'MOV #1,$TMP4' INSTRUCTION IN THE SUBROUTINE UITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR - SUMMARY OF REG TIMEOUTS 
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SEQUENCE 52 



2072 



02U40 

2073 02UA2 

2074 02K46 

2075 02H50 
2076 

2077 

2078 02H52 

2079 02H54 



OOOOOA 
004737 
172200 
104007 



000773 
104010 



S8TTL TEST # 11 - SUPERVISOR IfcO SPACE PDR'S TIMEOUT TEST 

ilEST n SUPERVISOR IftD SPACE PDR'S TIMEOUT TEST 

• THIS TEST ADDRESSES THE SIXTEEN (16) SUPERVISOR PAGE DESCRIPTOR 

• REGISTERS (SiPAR0-SIPAR7 AND SDPAR0-SDPAR7) 

• AND CHECKS THAT SOMETHING RESPONDS TO THEIR ADDRESSES. 



003024 



TST11 
1$: 



SCOPE 
JSR 
.WORD 
ERROR 



BR 

ERROR 



PC.TIMTST 

SIPDRO 

♦7 



1$ 
♦ 10 



GO DO THE TEST ON PAGE Of THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR - ONE OF THE REGISTERS 
TIMED OUT. FOR TIGHTER SCOPE LOOP, REPLACE THE 
•MOV #1.$TMP4' INSTRUCTION IN THE SUBROUTINE WITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR * SUMMARY OF REG TIMEOUTS 
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TEST # 1? - USER liO SPACE PAR'S TIMEOUT TEST 
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SEQUENCE 53 



?083 



02K56 
02K60 

2085 02K6A 

2086 02U66 
2087 

2088 

2089 02K70 

2090 02K72 



000004 
0OA737 
1776A0 
104007 



000773 
104010 



SBTTL TEST # 12 - USER ItO SPACE PAR'S TIMEOUT TEST 

'test 12 USER ItD SPACE PAR'S TIMEOUT TEST 

THIS TEST ADDRESSES THE SIXTEEN (16) USER PAGE ADDRESS 

REGISTERS (UIPAR0-UIPAR7 AND UDPAR0-UDPAR7) 

AND CHECKS THAT SOMETHING RESPONDS TO THEIR ADDRESSES. 



003024 



TST12: 
IS: 



SCOPE 
JSR 
.JORD 
ERROR 



BR 

ERROR 



PC.TIMTST 
U I PARC 
♦ 7 



1$ 

♦ 10 



GO DO THE TEST ON PAGE OF THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR - ONE OF THE REGISTERS 
TIMED OUT. FOh TIHGTER SCOPE LOOP. REPLACE THE 
'MOV #1,$TMP4' INSTRUCTION IN THE SUBROUTINE WITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR - SUMMARY OF REG TIMEOL'TS 
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TEST # 13 - USER liO SPACE PDR'S TIMEOUT TEST 
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SEO(.€NCE 5*- 



2094 



021474 
021476 
021502 
2097 021504 
2098 



2095 
2096 



2099 
2100 
2101 



021506 
021510 



000004 
004737 
177600 
104007 



000773 
104010 



S8TTL TEST # 13 - JSER ItD SPACE PDR'S TIMEOUT TEST 



•TEST 13 



003024 



TST13: 
1$: 



USER ItD SPACE POR'S TIMEOUT TFST 



THIS TEST ADDRESSES THE SIXTEEN (16) USER PAGE DESCRIPTOR 
REGISTERS (UIPAR0-UIPAR7 A^© tH)PAR0-UDPAR7) 
AND CHECKS THAT SOMETHING RESPONDS TO THEIR ADDRESSES. 



SCOPE 
JSR 
.yORD 
ERROR 



BR 

ERROR 



PC.TIMTST 

UIPDRO 

♦7 



1S 

+ 10 



GO DO THE TEST ON PAGE OF THIS LISTING 
PARAMETER USED FOR SUBROUTINE 

RETURN IS HERE FOR 1ST ERROR - ONE OF THE REGISTERS 
TIMED OUT. FOR TIGHTER SCOPE LOOP. REPLACE THE 
•MOV #2.JTMP4' INSTRUCTION IN THE SUBROUTINE WITH 000756 
RETURN TO TEST 

RETURN IS HERE FOR 2ND ERROR - SUMMARY OF REG TIMEOUTS 
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TEST # 14 - MMR0(15:13) BIT TEST t MHR? TEST 



D 

46 



SEOUEWCE 55 



2114 



.S8TTL TEST # 14 - MHR0(15:13) BIT TEST I MMR2 TEST 



2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2U3 
2H4 
2U5 
2146 
2147 
2148 
2H9 
2150 
2151 
2152 
2153 
2154 
2155 
2156 



021512 
021514 
021520 
021524 
021526 
021530 
021532 



021534 
021542 
021550 
021554 
021560 
021562 



021564 
021572 
021576 
021602 
021604 
021606 
021610 
021612 
021614 



021616 
021622 
021630 

021634 
021636 



021640 
021642 
021644 



000004 
012700 
012710 
000005 
011001 
001404 
104011 



012737 
013737 
012701 
020137 
001401 
104021 



012737 
012701 
012703 
005010 
050110 
011002 
020102 
001401 
104012 



012704 
013737 
020437 

001401 
104027 



006001 
077321 
005010 



•TEST 14 



MMR0(15:13) BIT TEST t MMR2 TEST 



► THIS TEST CHECKS BITS <15:13> OF MEMORY MANAGEMENT 
» REGISTER 0 TO SEE THAT EACH CAN BE SET AND CLEARED 

► AND THAT A 'IRESET" WILL CLEAR ALL OF THEM. A TEST 

► OF THESE THREE ERROR BITS CHECKS PART OF SRO. THE 
» SRO MUX AND THE KTMUX. THE REST OF THE BITS IN 

» SRO WILL BE CHECKED LATER. 

► ALSO CHECK THAT SR2 IS TRACKING WITH MEM. MGMT. 

* OFF BUT LOCKS UP WHEN ANY OF SRO ERROR BITS SET. 

■A************************************************************** 



177572 
160000 



TST14: 
1$: 



021542 
177576 
021542 
001270 



021602 
100000 
000003 



001110 
001270 2$: 



001110 3S: 



4$: 
5$: 



021604 
177576 
001270 



001270 



6$: 



7$: 



SCOPE 

MOV #SRO,RO 

MOV #160000, (RO) 
RESET 

MOV (RO).Rl 

BEO 2S 

ERROR +11 



MOV #2$,$LPERR 

MOV SR2,WASSR2 

MOV #2$,R1 

CMP Rl .WASSR2 

BEO 3S 

ERROR +21 



MOV ir4$.JLPERR 

MOV •BIT15.R1 

MOV ir3eR3 

CLR (RO) 

BIS R1,(R0) 

MOV (RO) ,R2 

CMP Rl ,R2 

BEO 6S 

ERROR +12 



MOV #5$,R4 

MOV SR2,WASSR2 

CMP R4,WASSR2 

BEO 7$ 

ERROR +27 



ROR Rl 
SOB R3.4f 
CLR (RO) 



LOAD ADDRESS OF SRO INTO RO 

SET BITS <15:13> IN SRO (ERROR BITS) 

ISSUE AND "INIT" SIGNAL 

READ SRO INTO Rl TO SEE IF CLEAR 

BRANCH IF SR0<15:13> CLEARED BY "INIT* 

SR0<15:13> NOT CLEARED BY A 'I^ESET" 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 1$" = CK)0770 

SET LOOP ON ERROR POINTER TO 2$ 

READ CONTENTS OF SR2 

LOAD EXPECTED CONTENTS INTO Rl 

IS SR2 TRACKING? 

BRANCH IF YES 

SR2 NOT 'TRACKING" VIRTUAL ADDRESSES 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 2J" = 000767 

SET LOOP ON ERROR POINTER TO 4$ 

PUT DATA TO BE WRITTEN IN Rl 

SETUP R3 AS A LOOP COUNTER 

CLEAR SRO 

SET ONE OF THE ERROR BITS IN SRO 

READ SRO INTO R2 

DID RIGHT ERROR BIT GET SET? 

BRANCH IF YES 

BITS WERE SET WRONG IN SRO 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 4$" = 000772 

LOAD EXPECTED CONTENTS OF SR2 IN R4 
READ SR2 

DID SR2 LOCK UP WHEN ERROR 

BIT SET IN SRI? 

BRANCH IF YES 

SR2 DID NOT LOCK UP 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 4$" = 000761 

CHANGE DATA TO CHECK NEXT ERROR BIT 
LOOP BACK UNTIL <15:13> ALL TESTED 
CLEAR SRO BEFORE LEAVING 



CKKTABO 11/44 MEH MGMT PRT A flACRO ^1113 23-APR-81 13:32 PAGE 46-1 SEQUENCE 
TEST # 14 - WRO(15:13) BIT TEST t MMR? TEST 

2157 021646 012737 021514 001110 MOV /TIS.SLPERR .-RESET LOOP ON ERROR POINTER TO 1$ 



f 5 

CKKTABO n/AA MEM MGMT PRT A MACRO Mil 13 23-APR-81 13:32 PAGE 
TEST » 15 - SRO i PSU DUAL ADDRESSING TEST 



SEQUENCE 57 



2167 



2168 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2178 



021 65A 
021656 
021662 
021666 
021674 
021700 
021702 



000004 
005037 
005037 
012737 
013700 
00U01 
104013 



021704 005037 
021710 005037 



S8TTL TEST # 15 - SRC t PSU DUAL ADDRESSING TEST 
'test 15 SRO ft PSU DUAL ADDRESSING TEST 



1 7777(> 
}77572 
000340 
}77572 



^77572 
y7777b 



TST15: 
1$: 



1 77776 



2$: 



THIS TEST CHECKS MORE Of THE ADf-PESS DETECTION LOGIC BY 
VERIFYING THAT STATUS REGISTER 0 IS NOT EFFECTED BY WRITING 
TO THE PSU AND THAT THE LOW BYTE OF STATUS REGISTER 0 
IS NOT EFFECTED BY WRITING TO ITS HIGH BYTE. THIS IS TO 
SEE IF ADJACENT OUTPUTS ARE SHORTED ON THE ADDRFSS DET. LOGIC 



SCOPE 

CLR 

CLR 

MOV 

MOV 

BEO 

ERROR 



CLR 
CLR 



PSU 
SRO 

#340. PSU 
SRO.RO 
2$ 
+13 



SRO 
PSU 



CLEAR THE PSU 

CLEAR STATUS REGISTER 0 

SET PRIORITY 7 IN LOU BYTE OF PSU 

READ STATUS REGISTER 0 

BRANCH IF IT UAS STILL 0 

SRO EFFECTED BY A URITE tq THE PSU 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL UITH 

'BR 1$" = 000767 

BE SURE SRO IS 0 BEFORE LEAVING 

BE SURE PSU IS 0 BEFORE LEAVING 



0 

> 
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TEST « 16 - BIT TEST OF MEnORY MANAC^NT REGISTER 1 



G S 
PAGE 48 



SEQUENCE 



2191 





000004 






TST16: 


SCOPE 




2192 021716 


012700 


177574 




20$: 


MOV 


*MMR1.R0 


2193 021722 


012704 


020000 






MOV 


#8IT13.R4 


2m 021726 


012737 


021734 


001110 




MOV 


«11$,$LPERR 


2195 021734 


012737 


100000 


177572 


11$: 


nov 


«BIT1S,nnR0 


2196 














2197 021742 


012703 


013427 






MOV 


*013427.R3 


2198 021746 


011001 








MOV 


(RO).RI 


2199 021750 


020103 








CMP 


R1,R3 


2200 021752 


001401 








BEO 


10$ 


2201 021754 


104014 








ERROR 


♦ 14 


2202 021756 


012737 


021764 


001110 


10$: 


MOV 


#12$.$LPERR 


2203 021764 


000005 






12$: 


RESET 




2204 021766 


011001 








MOV 


(R0;.R1 


2205 021770 


001401 








BEO 


1$ 


2206 021772 


104011 








ERROR 


♦ 11 


2207 021774 


012737 


022002 


001110 


1$: 


MOV 


#13$,$LPERR 


2208 022002 


012702 


177572 




13$: 


MOV 


*MMR0,R2 


2209 022006 


012722 


040000 






MOV 


*BIT14,(R2)^ 


2210 












2211 022012 


011001 








MOV 


(RO).RI 


2212 022014 


012703 


011027 






MOV 


#0n027,R3 


2213 022020 


020103 








CMP 


R1 ,R3 


2214 022022 


001401 








BEO 


2$ 


2215 022024 


104014 








ERROR 


♦14 


2216 022026 


005037 


177572 




2$: 


CLR 


HMRO 


2217 022032 


012737 


022040 


001110 




MOV 


*14$.$LPERR 


2218 022040 


012702 


177574 




14$: 


MOV 


*MMR0+2,R2 


2219 022044 


010442 








MOV 


R4,-(R2) 


2220 












2221 022046 


011001 








MOV 


(RO)-Rl 


2222 022050 


012703 


171000 






MOV 


#17l600,R3 


2223 022054 


020103 








CMP 


R1.R3 


2224 0.72056 


001401 








BEO 


3$ 


2225 022060 


104014 








ERROR 


♦ 14 


2226 022062 


005012 






3$: 


CLR 


(R2) 


2227 022064 


012737 


022072 


001110 




MOV 


#15$.$LPERR 


2228 022072 


012705 


177573 




15$: 


MOV 


*MMR0+1 .R5 


2229 022076 


012701 


001343 






MOV 


#READ0N^1 ,R1 


2230 022102 


112125 








MOVB 


(R1)*.(R5)+ 


2231 














2232 022104 


011001 








MOV 


(RO).Rl 


2233 022106 


012703 


006411 






MOV 


#006411.R3 



S8TTL TEST # 16 - BIT TEST OF MEMORY MANAGMENT REGISTER 1 

iTEST 16 SIT TEST OF MEMORY MANAGMENT REGISTER 1 

•THIS TEST WILL CAUSE BITS IN MMR1 TO BE LOCKED BY SETTING BITS <15:13> 
•IN HMRO. THE REGISTER ONLY GETS CLOCKED ON AN INSTRUCTION THAT AUTO 
•INCREMENTS OR AUTO DECREMENTS A REGISTER. THE LOWER BYTE IS ALWAYS CLOCKED 
•FIRST AND THE UPPER BYTE IS ONLY CLOCKED IF BOTH SOURCE AND DESTINATION 
•AUTO INCREMENT OR DECREMENT A REGISTER. 

•ALL COUNTS (♦I .-1 ,♦2,-2) THAT CAN BE GENERATED ARE CLOCKED INTO THE HIGH 
•AND LOW BYTES. ALL REGISTER NUMBERS ARE GENERATED, INCLUDING ALL THREE 
*R6'S, AND ALL THE BITS THAT HOLD THE REGISTER NUMBER IN BOTH BYTES 
•ARE TESTED; HOWEVER, ALL REGISTER NUMBERS ARE CLOCKED INTO BOTH HIGH AND 
•LOW BYTES. BUT ENOUGH ARE USED TO TEST THE LOGIC. 
**************************************************************** 

PUT ADDRESS OF MMR1 INTO RO 
SET READ ONLY BIT IN R4 
SET LOOP ON ERROR POINTER TO 11$ 
LOCK UP HMRl LOW BYTE 027, HIGH BYTE 027 
WORD-013427 

PUT EXPECTED DATA IN R3 
READ MMR1 INTO R1 
SEE IF DATA HATCHES 
BRANCH IF DATA HATCHES 
HHRI DID NOT TRACK PROPERLY 
SET LOOP ON ERROR POINTER TO 12$ 
ISSUE INIT 

SEE IF HHRI IS CLEARED 
BRANCH IF HHRI IS ZERO 
CAN'T CLEAR HHRI 

SET LOOP ON ERROR POINTER TO 13$ 
PUT ADDRESS OF HHRO INTO R2 
LOCK UP HHRI -LOWER BYTE 027 
UPPER BYTE 022-WORD 011027 
READ HHRI 

PUT EXPECTED DATA IN R3 
SEE IF DATA HATCHES 
BRANCH IF DATA MATCHES 
HHRI DID NOT TRACK PROPERLY 
CLEAR HHRO 

SET LOOP ON ERROR POINTER TO 14$ 
PUT ADDRESS OF HHRO PLUS 2 IN R2 
LOCK UP HHRI -LOWER BYTE 000 
UPPER BYTE 362-WORD 171000 
READ HHRI 

PUT EXPECTED DATA IN R3 
SEE IF DATA HATCHES 
BRANCH IF DATA HATCHES 
HHRI DID NOT TRACK PROPERLY 
CLEAR HHRO 

SET LOOP ON ERROR POINTER TO 15$ 
PUT ADDRESS OF HHRO'S UPPER BYTE IN R5 
PUT ADDRESS OF READ ONLY BIT <13> IN R1 
LOCK UP HHRI -LOWER BYTE Oil 
UPPER BYTE 015-WORO 006411 
READ HHRI 

PUT EXPECTED DATA IN R3 
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2254 022112 


020103 








CMP 


2235 022114 


001401 








BEO 


2236 022116 


104014 








ERROR 


2237 022120 


005012 






4$: 


CLR 


2238 022122 


012737 


022130 


001110 




MOV 


2239 022130 


012701 


177574 




16$: 


MOV 


2240 




001 344 








2241 022154 


012705 






MOV 


2242 












2243 022140 


114541 








MOVB 


2244 












2245 022142 


011001 








MOV 


2246 022144 


012703 


174775 






MOV 


2247 022150 


020103 








CMP 


2248 022152 


001401 








BEQ 


2249 022154 


104014 








ERROR 


2250 022156 


005012 






5$: 


CLR 


2251 022160 


012737 


022200 


001110 




MOV 


2252 022166 


012737 


040000 


}77776 




MOV * 


2253 022174 


010637 


001 1 76 






MOV 


2254 022200 


012706 


177574 




17$: 


MOV 


2255 022204 


012746 


040000 






MOV 


2256 












2257 022210 


011001 








MOV 


2258 022212 


012703 


173027 






MOV 


2259 022216 


020103 








CMP 


2260 022220 


001401 








BEO 


2261 022222 


104014 








ERROR 


2262 02222^ 


013706 


001176 




6$: 


MOV 


2263 022230 


005012 








CLR 


2264 022232 


012737 


022252 


001110 




MOV 


2265 022240 


012737 


140000 


1 77776 




MOV 


2266 022246 


010637 


001176 






MOV 


2267 022252 


012706 


1 77572 




18$: 


MOV 


2268 022256 


012726 


100000 






MOV 


2269 












2270 022262 


011001 








MOV 


2271 022264 


012703 


013027 






MOV 


2272 022270 


020103 








CMP 


2273 022272 


001401 








BEO 


2271^ 022271^ 


104014 








ERROR 


2275 022276 


013706 


001176 




7$: 


MOV 


2276 022302 


005037 


^77776 






CLR 


2277 022306 


005037 


^ 77572 






CLR 


2278 022312 


012737 


021716 


001110 




MOV 



H 5 

13:32 PAGE 48-1 



SEQUENCE 59 



R1.R3 
4$ 

♦ 14 

(R2) 

#16$.$LPERR 
*MMR0*2.R1 

#READON*2,R5 

-(R5).-(R1) 

(R0),R1 
*1 74^75, R3 
R1.R3 
5$ 

♦ 14 
(R2) 

#17$.$LPERR 
#40000. PSU 
SSP,$TMPO 
*MMR0*2.SSP 
#40000. -(SSP) 

(RO).RI 

#1 73027. R3 

R1.R3 

6$ 

♦14 

$TMP0.SSP 

(R2) 

#18$.$LPERR 
#140000. PSW 
USP.$THP0 
#rt1R0,USP 
#100000. (USP)* 

(RO).RI 

#01 302 7. R3 

R1.R3 

7$ 

♦U 

$TMPO.USP 

PSW 

MMRO 

#20$.$LPERR 



SEE IF DATA MATCHES 
BRANCH IF DATA MATCHES 
MMR1 DID NOT TRACK PROPERLY 
CLEAR MMRO 

SET LOOP ON ERROR POINTER TO 16$ 
PUT ADDRESS OF MMRO'S UPPER BrTE 
PLUS 1 IN R1 

PUT ADDRESS OF READ ONLY BIT «.13> 
PLUS 2 IN R5 

LOCK UP MMR1-L0WER BYTE 375 
UPPER BYTE 371 -WORD 174775 
READ MMR1 

PUT EXPECTED DATA IN R3 
SEE IF DATA MATCHES 
BRANCH IF DATA MATCHES 
MMR1 DID NOT TRACK PROPERLY 
CLEAR MMRO 

SET LOOP ON ERROR POINTER TO 17$ 
SET SUPERVISOR MODE 
SAVE SUPERVISOR STACK POINTER 
PUT ADDRESS OF WRO+2 IN SSP 
LOCK UP MMR1 -LOWER BYTE 027 
UPPER BYTE 366-WORD 173027 

READ m^^ 

PUT EXPECTED DATA IN R3 
SEE IF DATA MATCHES 
BRANCH IF DATA MATCHES 

m^^ did not track properly 

RESTORE THE SUPERVISOR STACK POINTER 
CLEAR MMRO 

SET LOOP ON ERROR POINTER TO 18$ 

SET USER MODE 

SAVE USER STACK POINTER 

PUT ADDRESS OF MMRO IN USP 

LOCK UP WR1 -LOWER BYTE 027 

UPPER BYTE 026-WORD 0130?7 

READ mRI 

PUT EXPECTED DATA IN R3 

SEE IF DATA MATCHES 

BRANCH IF DATA MATCHES 

MMR1 DID NOT TRACK PROPERLY 

RESTORE THE USER STACK POINTER 

GO BACK TO KERNAL MODE 

LET ALL MEM MGT REG'S TRACK 

SET LOOP ON ERROR POINTER TO START OF 



TEST 
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SEQUENCE 



2286 











TCT1 7 • 


crnop 




CCOf KJccjcc 


m ? /no 








MOW 

nuv 


ifMMQT on 


ccOO UccJcD 


V 1 £ IKiC. 










M^ OP 




\JMj\J I w 








ri R 


^00) 




1 1 inni 

1 1 1 lA/ 1 








MDl/R 




3PQ1 n5PXV% 










RFO 
oc w 


C« 












cppnp 


+ 1 1 




V 1 C » V J 






SI 


MOW 


Mf, R7 




\J \Ci Df 




oo^ 1 1 n 




MOW 

rn„' V 


if It tl PPOR 




niopio 






1 9 • 




RP (fiO) 




01 inoi 

V 1 1 vV 1 








MOW 


(ftCl) RI 




1 POPOI 










RP 01 




WW 1 H\J f 










P« 


2299 022364 


104015 








ERROR 


♦ 15 


2300 022366 


006302 






2$: 


ASL 


R2 


2301 022370 


077307 








SOB 


R3J$ 


2302 022372 


012702 


000077 






MOV 


M77,R2 


2303 022376 


012737 


022404 


001110 




MOV 


#12$.$LPERR 


?J04 022404 


010210 






12$: 


MOV 


R2.(R0) 


2305 022406 


011001 








MOV 


(R0),R1 


2306 022410 


120201 








CMP8 


R2,R1 


2307 022412 


001401 








BEO 


3$ 


2308 022414 


104015 








ERROR 


♦ 15 


2309 022416 


012737 


022424 


001110 


3$: 


MOV 


*13$,$LPERR 


2310 022424 


000005 






13$: 


RESET 




2311 022426 


111002 








MOVB 


(RO). R2 


2312 022430 


001401 








BEO 


4$ 


2313 022432 


104011 








ERROR 


♦ 11 


2314 022434 


012737 


022522 


001110 


4$: 


MOV 


#20$.$LPERR 



.S8TTL TEST # 17 - BIT TEST OF MEMORY MANAGEMENT REGISTER 3 

TEST 17 BIT TEST OF MEMORY MANAGEMENT REGISTER 3 

THIS TEST SETS AND CLEARS BITS <05:04> AM) <02:00> OF MMR3. IT DOES 
NOT TEST THAT THE BITS FUNCTION PROPERLY SlftCE THAT REQUIRES MORE 
LOGIC; HOUEVER. IT TESTS THE REGISTER AND THE DATA PATH TO AND FROM 
THE REGISTER. THE PROPER FUNCTIONING OF THESE BITS IS TESTED LATER 
IN SEVERAL TESTS. 
I*************************************************************** 

PUT ADDRESS OF MMR3 IN RO 
SET BIT TO FLOAT THRU MMR3 
CLEAR MMR3 
READ MMR3 INTO RI 
BRANCH IF Zk'RO 
CAN'T CLEAR MMR3 
SET UP LOOP COUNT 
SET LOOP ON ERROR POINTER TO 1$ 
LOAD WR3 
READ MMR3 INTO RI 
DOES DATA MATCH PATTERN? 
BRANCH IF IT MATCHES 
MMR3 HAS WRONG DATA 
LEFT SHIFT DATA PATTERN 
BRANCH BACK IF R3 NOT 0 
PUT DATA PATTERN IN R2 
SET LOOP ON ERROR POINTER TO 12$ 
TRY TO SET ALL BITS IN MMR3 
READ MMR3 INTO RI 
SEE IF ALL BITS GOT SET 
BRANCH IF ALL WERE SET 
MMR3 HAS WRONG DATA 
SET LOOP ON ERROR POINTER TO 13$ 
ISSl£ AN INIT 
READ MMR3 INTO R2 
BRANCH IF MMR3 CLEARED 
^AN'T CLEAR M^V)3 

SET LOOP ON ERROR POINTER TO START OF TEST 



CKKTABO 11/44 MEM MGMT PRT A 
PAR MO POR TESTS 

2315 
2516 
2517 
2318 



J 5 
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SEQUENCE 61 



.S8TTL PAR AND PDR TESTS 

GROUP ? PAR AND PDR TESTS 



/ 



CKKTA80 11/44 MEM MGMT PRT A MACRO Mil 13 23-APR-81 13:32 PAGE 
TEST M 20 ' DUAL ADDRESS KERNAL PAR'S.QN LOADING 



K 

51 



SE QUE MCE 



2332 



022A42 
2333 02244A 
022450 
022456 
022462 
022466 
022^72 
022476 
022500 
022502 
022504 
022510 



022512 
022520 
022524 
022530 
022534 
022540 
022544 
022550 
022552 
022554 

022556 
022560 
022564 
022570 
022574 
022600 
022602 
022606 
022612 
022614 
022622 
022626 
022630 
022636 



000004 
004737 
012737 
012705 
004737 
012700 
012701 
011002 
001401 
104030 
062700 
077106 



012737 
012700 
012705 
004737 
012701 
012710 
005037 
011102 
001406 
020001 

001402 
004737 
005237 
162701 
022701 
101761 
062700 
022700 
103344 
012737 
005737 
000404 
013737 
104031 



002276 
022476 
172340 
002260 
1 72340 
000020 



000002 



0225c'. 
172340 
172340 
002260 
172376 
\7n77 
001176 



002334 
001176 
000002 
172340 

000002 
172376 

022444 
001322 



001110 



001110 



001110 



SBTTL TEST # 20 - DUAL ADDRESS KERNAL PAR'S, ON LOADING 

iTEST 20 DUAL ADDRESS KERNAL PAR'S, ON LOADING 

• 

•THIS TEST FIRST CLEARS ALL THE KERNAL PAGE ADDRESS REGISTERS. 
•AND CHECKS TO SEE THAT THEY EACH HOLD ZERO. THEN, STARTING 
•WITH I-SPACE ADDRESS REGISTER ZERO. ONE REGISTER AT A TIME IS 
•LOADED WITH A NEGATIVE ONE. ALL KERNAL ADDRESS REGISTERS ARE 
•NOW READ TO SEE THAT ONLY THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SUmARY OF THEM IS GIVEN 
•AT THE END OF THIS TEST. 

************************ ********************************** •**••• 

tST20: 
20$: 



1$: 



2$: 

.NOW START DUAL ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 
.•READING THE REST TO SEE ONLY THAT REGISTER IS NON ZERO. (ANY 
.•DROPPED BITS WILL BE FOUND IN THE NEXT TEST), 



SCOPE 






JSR 


PC. CLEANUP 


•INITIALIZE THE ERROR LOCATIONS 


MOV 


/rU.SLPERR 


■SET LOOP ON ERROR POINTER TO 1$ 


MOV 


/TKIPARO.RS 


•PUT ADDRESS OF FIRST PAR IN R5 


JSR 


PCCLRREG 


■CLEAR 16 REGISTERS POINTED TO BY R5 


MOV 


<fKIPARO,RO 


■PUT ADDRESS OF FIRST PAR IN RO 


MOV 


#20.R1 


■BRANCH COUNT IS 16 DECIMAL 


MOV 


(RO) ,R2 


■READ PAR TO R2 


BEQ 


2$ 


■BRANCH IF PAR IS 0 


ERROR 


♦30 


■PAR NOT ZERO 


ADD 


/r2,R0 


;POINT TO NEXT REGISTER 


SOB 


RI.IS 


■BRANCH BACK TO 1$ 15 TIMES 



3$: 



4$: 



5$: 
6$: 



001322 001210 



MOV 


/r3$,$LPERR 


;SET LOOP ON ERROR POINTER TO 3$ 


MOV 


#KIPARO.«0 


;PUT ADDRESS OF FIRST PAR IN RO 


MOV 


#KIPAR0.R5 


;LOAD STARTING ADDRESS INTO R5 


JSR 


PCCLRREG 


; CLEAR 16 REGISTERS POINTED TO BY R5 


MOV 


#KDPAR7,R1 


;PUT KDPAR7 ADDRESS INTO R1 


MOV 


4f-1 , (RO) 
STMPO 


;LOAD REGISTER UNDER TEST 


CLR 


;FLAG TO INDICATE THERE WAS A MATCH 


MOV 


(R1 ),R2 


;READ ALL REGISTERS 


BEO 


6$ 


;BRANCH IF REGISTER IS 0 


CMP 


R0,R1 


rlS THE ADDRESS OF NON-ZERO REGISTER THE SAME 
;AS THE REGISTER UNDER TEST** 


BEO 


5$ 


rBRANCH IF ADDRESSES MATCH 


JSR 


PC, DUAL ADR 


;LOG AND REPORT ERRORS 


INC 


STMPO 


-SET FLAG WHEN ADDRESSES MATCH 


SUB 


/r2,R1 


•POINT TO NEXT REGISTER 


CMP 


*KIPAR0,R1 


;SEE IF ALL REGISTERS HAVE BEEN READ 


BLOS 


4$ 


•BRANCH IF MORE TO READ 


ADD 


/r2,R0 


;NOW LOAD THE NEXT REGISTER 


CMP 


*KDPAR7,R0 


;SEE IF THERE ARE MORE REGISTERS TO TEST 


BHIS 


3$ 


rSRANCH IF MORE REGISTERS TO TEST 


MOV 


/r20$.$LPERR 


■SET LOOP ON ERROR POINTER TO START OF TEST 


TST 


ERRCNT 


■SEE IF THERE WERE ANY ERRORS 


BR 


TST21 


■.•BRANCH TO NEXT TEST IF NO ERRORS 


MOV 


ERRCNT, $TMP5 


■SAVE n OF ERRORS FOR PAR OUT 


ERROR 


♦31 


'.•SUMMARY OF DUAL ADDRESS TEST 
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SEQUENCE 63 



2337 



022640 
2338 022642 
022646 
022654 
022660 
022664 
0226 -0 
022674 
022676 
022700 
022702 
022706 



022710 
022716 
022722 
022726 
022752 
022736 
0227^2 
022746 
022750 
022752 

022754 
022756 
022762 
022766 
022772 
022776 
023000 
023004 
023010 
023012 
023020 
023024 
023026 
023034 



000004 
004737 
012737 
012705 
004737 
012700 
012701 
011002 
001401 
104030 
062700 
077106 



012737 
012700 
012705 
004737 
012701 
012710 
005037 
011102 
001406 
020001 

001402 
004737 
005237 
162701 
022701 
101761 
062700 
022700 
103344 
012737 
005737 
000404 
013737 
104031 



002276 

022674 001110 

172240 

002260 

172240 

000020 



000002 



022722 001110 

172240 

172240 

002260 

172276 

177777 

001176 



002334 
001176 
000002 
172240 

000002 
172276 

022642 001110 
001322 

001322 001210 



S8TTL TEST # 21 - DUAL ADDRESS SUPERVISOR PAR'S. ON LOADING 

•TEST 21 DUAL ADDRESS SUPERVISOR PAR'S. ON LOADING 

* 

•THIS TEST FIRST CLEARS ML THE SUPERVISOR PAGE ADDRESS REGISTERS, 
•AND CHECKS TO SEE THAT THEV EACH HOLD ZERO. THEN, STARTING 
•WITH I-SPACE ADDRESS REGISTER ZERO. ONE REGISTER AT A TIME IS 
•LOADED WITH A NEGATIVE ONE. ALL SUPERVISOR ADDRESS REGISTERS ARE 
•NOW READ TO SEE THAT ONLV THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SUMMARy OF THEM IS GIVEN 
•AT THE END OF THIS TEST. 



TST21 
20S: 



IS 



2$ 



SCOPE 
JSR 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
BEQ 
ERROR 
ADD 
SOB 



PC, CLEANUP 
#1$,$LPERR 
#SIPAR0,R5 
PCCLRREG 
#SIPARO,RO 
<r20,Rl 
(RO) ,R2 
2S 
♦30 
02, RO 
Rl,1$ 



INITIALIZE THE ERROR LOCATIONS 
SET LOOP ON ERROR POINTER TO 1$ 
PUT ADDRESS OF FIRST PAR IN R5 
CLEAR 16 REGISTERS POINTED TO BY 95 
PUT ADDRESS OF FIRST PAR IN RO 
BRANCH COUNT IS 16 DECIMAL 
READ PAR TO R2 
BRANCH IF PAR IS 0 
PAR NOT ZERO 
POINT TO NEXT REGISTER 
BRANCH BACK TO 1$ 15 TIMES 
NOW START DUAL ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 
READING THE REST TO SEE ONLY THAT REGISTER IS NON ZERO. (ANY 
DROPPED BITS WILL BE FOUND IN THE NEXT TEST). 



MOV #3S,$LPERR 

MOV #SIPARO.RO 

3$: MOV <rSIPAR0,R5 

JSR PCCLRREG 

MOV #SDPAR7,R1 

MOV #-1 , (RO) 

4$: CLR $T/VO 

MOV (R1),R2 

BEQ 6S 

CMP R0,R1 

BEQ 5$ 

JSR PC, DUAL ADR 

5$: INC STMPO 

6S: SUB 02, M 

CMP fSIPARO.Rl 

BLOS 4S 

ADD *2.R0 

CMP #SDPAR7,R0 

BHIS 3S 

MOV ir20$.$LPERR 

, TST ERRCNT 

BR TST22 

MOV ERRCNT. fTMP5 

ERROR +31 



SET LOOP ON ERROR POINTER TO 3$ 
PUT ADDRESS OF FIRST PAR IN RO 
LOAD STARTING ADDRESS INTO R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT SDPAR7 ADDRESS INTO R1 
LOAD REGISTER UNDER TEST 
FLAG TO INDICATE THERE WAS A MATCH 
READ ALL REGISTERS • 
BRANCH IF REGISTER IS 0 

IS THE ADDRESS OF NON-ZERO REGISTER THE SAME 

AS THE REGISTER UNDER TEST? 

BRANCH IF ADDRESSES MATCH 

LOG AND REPORT ERRORS 

SET FUG WHEN ADDRESSES MATCH 

POINT TO NEXT REGISTER 

SEE IF ALL REGISTERS HAVE BEEN READ 

BRANCH IF MORE TO READ 

NOW LOAD THE NEXT REGISTER 

SEE IF THERE ARE MORE REGISTERS TO TEST 

BRANCH IF MORE REGISTERS TO TEST 

SET LOOP ON ERROR POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

.-BRANCH TO NEXT TEST IF NO ERRORS 

SAVE 0 OF ERRORS FOR PAR OUT 

.•SUMMARY OF DUAL ADDRESS TEST 



CKKTABO n/44 ME« MGMT PRT A MACRO Ml 113 23-APR-81 13:32 
TEST » 22 - DUAL ADDRESS USER PAR'S,ON LOADING 
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SEQUENCE 



2342 

J 



023036 
2343 023040 
023044 
023052 
023056 
023062 
023066 
023072 
023074 
023076 
023100 
0P3104 



000004 
004737 
012737 
012705 
004737 
012700 
012701 
011002 
001401 
104030 
062700 
077106 



S8TTL TEST It 22 - DUAL ADDRES*! USER PAR'S, ON LOADING 



•TEST 22 



DUAL ADDRESS USER PAR'S, ON LOADING 



•THIS TEST FIRST CLEARS ALL THE USER PAGE ADDRESS REGISTERS. 
•AND CHECKS TO SEE THAT THEY EACH HOLD ZERO. THEN, STARTING 
•WITH I-SPACE ADDRESS REGISTER ZERO, ONE REGISTER AT A TIME IS 
•LOADED WITH A NEGATIVE ONE. ALL USER ADDRESS REGISTERS ARE 
•NOW READ TO SEE THAT ONLY THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SlfflARY OF THEM IS GIVEN 
•AT THE END OF THIS TEST. 



002276 
023072 
177640 
002260 
177640 
000020 



000002 



001110 



TST22 
20S: 



IS 



2$: 



SCOPE 
JSR 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
BEQ 
ERROR 
ADD 
SOB 



PC. CLEANUP 
#li.$LPERR 
/WJIPARO.RS 
PC.CLRREG 
/IfUIPARO.RO 
#20,R1 
(RO) ,R2 
2$ 
♦30 
#2,R0 
RI.U 



023106 


012737 


023120 


001110 




MOV 


#3$,$LPERR 


023114 


012700 


177640 






MOV 


iruiPARO,RO 


023120 


012705 


177640 




3S: 


MOV 


irUIPAR0,R5 


023124 


004737 


002260 






JSR 


PC.CLRREG 


023130 


012701 


177676 






MOV 


4fU)PAR7,R1 


023134 


012710 


Mim 






MOV 


#-1 , (RO) 


023140 


005037 


001176 




4$: 


CLR 


STMPO 


023144 


011102 








MOV 


(R1),R2 


023146 


001406 








BEQ 


6$ 


023150 


020001 








CMP 


RO.RI 


023152 


001402 








BEQ 


5$ 


023154 


004737 


002334 






JSR 


PC. DUAL ADR 


023160 


005237 


001176 




5$: 


INC 


STMPO 


023164 


162701 


000002 




6$: 


SUB 


#2.R1 


023170 


022701 


177640 






CMP 


*UIPAR0.R1 


023174 


101761 








BLOS 


4S 


023176 


062700 


000002 






ADD 


*2.R0 


023202 


022700 








CMP 


#UDPAR7.R0 


023206 


103344 








BHIS 


3S 


023210 


012737 


023040 


001110 




MOV 


#20S.SLPERR 


023216 


005737 


001322 






TST 


ERRCNT 


02Z222 


000404 








BR 


TST23 


023224 


013737 


001322 


001210 




MOV 


ERRCNT. STMPS 


023232 


104031 








ERROR 


+31 



INITIALIZE THE ERROR LOCATIONS 
SET LOOP ON ERROR POINTER TO IS 
PUT ADDRESS OF FIRST PAR IN R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT ADDRESS OF FIRST PAR IN RO 
BRANCH COUNT IS 16 DECIMAL 
READ PAR TO R2 
BRANCH IF PAR IS 0 
PAR NOT ZERO 
POINT TO NEXT REGISTER 
BRANCH BACK TO IS 15 TIMES 
NOW START DUAL ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 
READING THE REST TO SEE ONLY THAT REGISTER IS NON ZERO. (ANY 
DROPPED BITS WILL BE FOUND IN THE NEXT TEST). 

SET LOOP ON ERROR POINTER TO 3S 
PUT ADDRESS OF FIRST PAR IN RO 
LOAD STARTING ADDRESS INTO R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT UDPAR7 ADDRESS INTO R1 
LOAD REGISTER UNDER TEST 
FLAG TO INDICATE THERE WAS A MATCH 
READ ALL REGISTERS 
BRANCH IF REGISTER IS 0 
IS THE ADDRESS OF NON-ZERO REGISTER THE 
AS THE REGISTER UNDER TEST? 
BRANCH IF ADDRESSES MATCH 
LOG AND REPORT ERRORS 
SET FLAG WHEN ADDRESSES MATCH 
POINT TO NEXT REGISTER 
SEE IF ALL REGISTERS HAVE BEEN READ 
BRANCH IF MORE TO READ 
NOW LOAD THE NEXT REGISTER 
SEE IF THERE ARE MORE REGISTERS TO TEST 
BRANCH IF MORE REGISTERS TO TEST 
SET LOOP ON ERROR POINTER TO START OF TEST 
SEE IF THERE WERE ANY ERRORS 
.-BRANCH TO NEXT TEST IF NO ERRORS 
SAVE n OF ERRORS FOR PAR OUT 
; SUMMARY OF DUAL ADDRESS TEST 



SAME 
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SEQUENCE 



234.7 



023234 
2348 023236 
023242 
023250 
023254 
023260 
023264 
023270 
023272 
023274 
023276 
023302 



000004 
004737 
012737 
012705 
004737 
012700 
012701 
011002 
001401 
104030 
062700 
077106 



S8TTL TEST # 23 - DUAL ADDRESS KERNAL PDR'S.ON LOADING 



*TEST 23 



DUAL ADDRESS KERNAL PDR'S.ON LOADING 



•THIS TEST FIRST CLEARS ALL THE KERNEL PAGE DESCRIPTOR REGISTERS. 
*AW CHECKS TO SEE THAT THEY EACH HOLD ZERO. THEN. STARTING 
*WITH I-SPACE DESCRIPTOR REGISTER ZERO, ONE REGISTER AT A TIME IS 
•LCMDED WITH A NEGATIVE ONE. ALL KERNEL DESCRIPTOR REGISTERS ARE 
*NOW READ TO SEE THAT ONLY THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SUHMARY OF THEM IS GIVEN 
•AT THE END OF THIS TEST. 



002276 

023270 001110 

172300 

002260 

172300 

000020 



000002 



TST23 
20S: 



1S: 



2$: 



SCOPE 
JSR 
MOV 
MOV 
JSR 
MOV 
MOV 
MOV 
BEQ 
ERROR 
ADD 
SOB 



PC.CLEANUP 
#1$,$LPERR 
*KIPDR0.R5 
PCCLRREG 
/WCIPDRO,RO 
#20.R1 
(RO) ,R2 
2S 
♦30 
#2.R0 
RI.IS 



023304 


012737 


023316 


001110 




MOV 


»3$,$LPERR 


023312 


012700 


172300 






MOV 


M(IPDRO,RO 


023316 


012705 


172300 




3$: 


MOV 


*KIP0R0.R5 


023322 


004737 


002260 






JSR 


PCCLRREG 


023326 


012701 


172336 






MOV 


/WCDPDRZ.Rl 


023332 


012710 


1 77777 






MOV 


#-1,(R0) ' 


023336 


005037 


001176 




4$: 


CLR 


STMPO 


023342 


011102 








MOV 


(R1),R2 


023344 


001406 








BEQ 


6S 


023346 


020001 








CMP 


RO.RI 


023350 


001402 








BEQ 


5$ 


023352 


004737 


002334 






JSR 


PCDUALADR 


023356 


005237 


001176 




5$: 


INC 


STMPO 


023362 


162701 


000002 




6$: 


SUB 


*2,R1 


023366 


022701 


172300 






CMP 


WCIPDRO.RT 


023372 


101761 








BLOS 


4$ 


023374 


062700 


000002 






ADD 


/r2,R0 


023400 


022700 


172336 






CMP 


*KDPDR7,R0 


023404 


103344 








BHIS 


3S 


023406 


012737 


023236 


oomo 




MOV 


*20$.$LPERR 


023414 


005737 


001322 






TST 


ERRCNT 


023420 


000404 








BR 


TST24 


023422 


013737 


001322 


001210 




MOV 


ERRCNT, $TMP5 


023430 


104031 








ERROR 


♦31 



INITIALIZE THE ERROR LOCATIONS 
SET LOOP ON ERROR POINTER TO IS 
PUT ADDRESS OF FIRST POR IN R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT ADDRESS OF FIRST PDR IN RO 
BRANCH COUNT IS 16 DECIMAL 
READ PDR TO R2 
BRANCH IF PDR IS 0 
PDR NOT ZERO 
POINT TO NEXT REGISTER 
BRANCH BACK TO IS 15 TIMES 
NOW START DUAL ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 
READING THE REST TO SEE ONLY THAT REGISTER IS NON ZERO. (ANY 
DROPPED BITS WILL BE FOUND IN THE NEXT TEST). 

SET LOOP ON ERROR POINTER TO 3S 
PUT ADDRESS OF FIRST PDR IN RO 
LOAD STARTING ADDRESS INTO R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT KDPDR7 ADDRESS INTO R1 
LOAD REGISTER UM>ER TEST , 
FLAG TO INDICATE THERE WAS A MATCH 
READ ALL REGISTERS 
BRANCH IF REGISTER IS 0 

IS THE ADDRESS OF NON-ZERO REGISTER THE SAME 
AS THE REGISTER UNDER TEST? 
BRANCH IF ADDRESSES MATCH 
LOG AND REPORT ERRORS 
SET FLAG WHEN ADDRESSES MATCH 
POINT TO NEXT REGISTER 
SEE IF ALL REGISTERS HAVE BEEN READ 
BRANCH IF MORE TO READ 
NOW LOAD THE NEXT REGISTER 
SEE IF THERE ARE MORE REGISTERS TO TEST 
BRANCH IF MORE REGISTERS TO TEST 
SET LOOP ON ERROR POINTER TO START OF TEST 
SEE IF THERE WERE ANY ERRORS 
.-BRANCH TO NEXT TEST IF NO ERRORS 
SAVE » OF ERRORS FOR PDR OUT 
;Slff1ARY OF DUAL ADDRESS TEST 
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PAGE 



B 

55 



SEQUENCE 



2352 



025A32 
2353 023434 
023440 
023446 
023452 
023456 
02346? 
023466 
023470 
023472 
023474 
023500 



000004 
004737 
012737 
012705 
004737 
012700 
012701 
011002 
001401 
104030 
062^00 
077106 



S8TTL TEST # 24 - DUAL ADDRESS SUPERVISOR PDR'S.ON LOADING 



*TEST 24 



DUAL ADDRESS SUPERVISOR PDR'S.ON LOADING 



•THIS TEST FIRST CLEARS ALL THE SUPERVISOR PAGE DESCRIPTOR REGISTERS. 
•AND CHECKS TO SEE THAT THEY EACH HOLD ZERO. THEN, STARTING 
•WITH I-SPACE DESCRIPTOR REGISTER ZERO. ONE REGISTER AT A TI«E IS 
•LOADED WITH A NEGATIVE ONE. ALL SUPERVISOR DESCRIPTOR REGISTERS ARE 
•NOW READ TO SEE THAT ONLY THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SlfflARY OF THEM IS GIVEN 
•AT THE END Of THIS TEST. 



002276 
023466 
172200 
002260 
1 72200 
000020 



000002 



oomo 



TST24: 
20S: 



IS 



2S 



SCOPE 
JSR 

nov 
nov 

JSR 
MOV 

nov 

MOV 
BEQ 
ERROR 
ADD 
SOB 



PC.CLEANUP 
#1$,SLPERR 
#SIPDR0,R5 

PCCLRREG 
#SIPDRO,RO 
#20,R1 
(RO) .R2 
2"* 
♦30 
*2.R0 
R1J$ 



023502 


012737 


023514 


oomo 




nov 


»3$,$LPERR 


023510 


012700 


172200 






nov 


#SIPORO,RO 


023514 


012705 


172200 




3$: 


nov 


#SIPDR0,R5 


023520 


004737 


002260 






JSR 


PCCIRREG 


023524 


012701 


172236 






nov 


#SDPDR7,R1 


023530 


012710 


M7777 






nov 


#-1 , (RO) 


023554 


005037 


001176 




4S: 


CLR 


STWPO 


023540 


011102 








nov 


(R1).R2 


023542 


001406 








BEO 


6$ 


023544 


020001 








cnp 


R0,R1 


023546 


001402 








BEQ 


5$ 


023550 


004737 


002334 






JSR 


PC, DUAL ADR 


023554 


005237 


001176 




5$; 


INC 


STMPO 


023560 


162701 


000002 




^$: 


SIB 


#2,R1 


023564 


022701 


172200 






cnp 


#SIPDR0,R1 


023570 


101761 








BLOS 


4S 


023572 


062700 


000002 






ADD 


#2,R0 


023576 


022700 


y722lk 






cnp 


#SDPDR7,R0 


023602 


103344 








BHIS 


3$ 


023604 


012737 


025^3^ 


001110 




nov 


#20$,SLPERR 


023612 


005737 


001322 






TST 


ERRCNT 


023616 


000404 








BR 


TST25 


023620 


013737 


001322 


001210 




nov 


ERRCNT, $TnP5 


023626 


104031 








ERROR 


♦31 



R5 



INITIALIZE THE ERROR LOCATIONS 
SET LOOP ON ERROR POINTER TO IS 
PUT ADDRESS OF FIRST PDR IN R5 
CLEAR 16 REGISTERS POINTED TO BY R5 
PUT ADDRESS OF FIRST PDR IN RO 
BRANCH COUNT IS 16 DECIMAL 
READ PDR TO R2 
BRANCH IF PDR IS 0 
PDR NOT ZERO 
POINT TO NEXT REGISTER 
BRANCH BACK TO 1$ 15 TinES 
NOW START DUAL ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 
READING THE REST TO SEE ONLY THAT REGISTER :S NON ZERO. (ANY 
DROPPED BITS WILL BE FOUND IN THE NEXT TEST). 

~ SET LOOP ON ERROR POINTER TO 3S 

PUT ADDRESS OF FIRST PDR IN RO 
LOAD STARTING ADDRESS INTO R5 
CLEAR 16 REGISTERS POINTED TO BY 
PUT SDPDR7 ADDRESS INTO R1 
LOAD REGISTER LMDER TEST 
FLAG TO IM>ICATE THERE UAS A HATCH 
READ ALL REGISTERS 
BRANCH IF REGISTER IS 0 

IS THE ADDRESS OF NON-ZERO REGISTER THE SAME 
AS THE REGISTER IfDER lEST? 
BRANCH IF ADDRESSES HATCH 
LOG AND REPORT ERRORS 
SET FLAG UHEN ADDRESSES HATCH 
POINT TO NEXT REGISTER 
SEE IF ALL REGISTERS HAVE BEEN READ 
BRANCH IF MORE TO READ 
NOW LOAD THE NEXT REGISTER 
SEE IF THERE ARE MORE REGISTERS TO 
BRANCH IF nORE REGISTERS TO TEST 
SET LOOP ON ERROR POINTER TO START OF TEST 
SEE IF THERE WERE ANY ERRORS 
.-BRANCH TO NEXT TEST IF NO ERRORS 
SAVE » OF ERRORS FOR PDR OUT 
.SlfWARY OF DUAL ADDRESS TEST 



TEST 
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PAGE 



C 6 
S6 



SEQUENCE 



2357 



023630 
2358 023632 
023636 
02364A 
023650 
02365A 
023660 
02366A 
023666 
023670 
023672 
023676 



023700 
023706 
023712 
023716 
023722 
023726 
023732 
023736 
023740 
0237A2 

0237AA 
0237A6 
023752 
023756 
023762 
023766 
023770 
023774 
024000 
024002 
024010 
024014 
024016 
024024 



012737 
012700 
012705 
004737 
012701 
012710 
005037 
011102 
001406 
020001 

001402 
004737 
005237 
162701 
022701 
101761 
062700 
022700 
103344 
012737 
005737 
000404 
013737 
104031 



S8TTL TEST # 25 - DUAL ADDRESS USER PDR'S.ON LOADING 



•TEST 25 



DUAL ADDRESS USER PDR'S.ON LOADING 



•THIS TEST FIRST CLEARS ALL THE USER PAGE DESCRIPTOR REGISTERS. 
•AND CHECKS TO SEE THAT THEY EACH HOLD ZERO. THEN. STARTING 
•WITH I-SPACE DESCRIPTOR REGISTER ZERO. ONE REGISTER AT A TIME IS 
•LOADED WITH A NEGATIVE ONE. ALL USER DESCRIPTOR REGISTERS ARE 
•NOW READ TO SEE THAT ONLY THE ONE UNDER TEST IS NON-ZERO. 
•INDIVIDUAL ERRORS ARE REPORTED AND A SUPfMRY OF THEM IS GIVEN 
•AT THE END OF THIS TEST. 



000004 




tsT25 


: SCOPE 






004737 


002276 


20S: 


JSR 


PC, CLEANUP 


INITIALIZE THE ERROR LOCATIONS 


012737 


023664 001110 




MOV 


#1$.$LPERR 


SET LOOP ON ERROR POINTER TO IS 


012705 


177600 




MOV 


#UIPDR0,R5 


•PUT ADDRESS OF FIRST PDR IN R5 


004737 


002260 




JSR 


PC.CLRREG 


•CLEAR 16 REGISTERS POINTED 10 BY R5 


012700 


177600 




MOV 


#UIPDRO.RO 


•PUT ADDRESS OF FIRST PDR IN RO 


012701 


000020 




MOV 


#20. Rl 


;BRANCH COUNT IS 16 DECIMAL 


011002 


1$: 


MOV 


(R0),R2 


;READ PDR TO R2 


001401 






BEQ 


2$ 


•BRANCH IF PDR IS 0 


104030 
062700 






ERROR 


+30 


;PDR NOT ZERO 


000002 


2$: 


ADD 


#2.R0 


rPOINT TO NEXT REGISTER 


077106 






SOB 


Rl.lS 


rSRANCH BACK TO 1$ 15 TIMES 




.-NOW 


START DUAL 


ADDRESSING TEST BY LOADING -1 INTO ONE REGISTER AND 



023712 
177600 
177600 
002260 
177636 
1 77777 
001176 



002334 
001176 
000002 
177600 

000002 
1 77636 

023632 
001322 



001110 



001110 



001322 001210 



READING THE REST TO SEE ONLY THAT REGISTER IS NON ZERO. (ANY 
DROPPED BITS WILL BE FOUND IN THE NEXT TEST). 

~ SET LOOP ON ERROR POINTER TO 3$ 

PUT ADDRESS OF FIRST PDR IN RO 
3$: MOV #UlPDR0'.R5 ;LOAD STARTING ADDRESS INTO R5 

CLEAR 16 REGISTERS POINTED TO BY R5 
PUT UDPDR7 ADDRESS INTO R1 
LOAD REGISTER UNDER TEST 
4$: CLR STMPO .FLAG TO INDICATE THERE WAS A MATCH 

READ ALL REGISTERS 
BRANCH IF REGISTER IS 0 

IS THE ADDRESS OF NON-ZERO REGISTER THE SAME 
AS THE REGISTER IM>ER TEST? 
BRANCH IF ADDRESSES MATCH 
LOG AND REPORT ERRORS 
5$; INC $t«PO ;SET FLAG yHEN ADDRESSES MATCH 

6$: SUB #2,R1 :POINT TO NEXT REGISTER 

SEE IF ALL REGISTERS HAVE BEEN READ 
BRANCH IF MORE TO READ 
NOW LOAD THE NEXT REGISTER 
SEE IF THERE ARE MORE REGISTERS TO TEST 
BRANCH IF MORE REGISTERS TO TEST 
SET LOOP ON ERROR POINTER TO START OF TEST 
SEE IF THERE WERE ANY ERRORS 
:BRANCH TO NEXT TEST IF NO ERRORS 
SAVE » OF ERRORS FOR PDR OUT 
.-SUMMARY OF DUAL ADDRESS TEST 



MOV 


#3$,$LPERR 


MOV 


«UIPDRO,RO 


MOV 


#UIPDR0.R5 


JSR 


PC.CLRREG 


MOV 


*UDP0R7.R1 


MOV 


#-1.(R0) 


CLR 


STMPO 


MOV 


(Rl) .R2 


BEQ 


6$ 


CMP 


R0,R1 


BEQ 


5S 


JSR 


PC, DUAL ADR 


INC 


STMPO 


SUB 


#2.R1 


CMP 


/rUIPDR0,Rl 


BLOS 


4$ 


ADD 


/r2.R0 


CMP 


#UDPDR7,R0 


BHIS 


5$ 


MOV 


#20$.$LPERR 


TST 


ERRCNT 


BR 


TST26 


MOV 


ERRCNT, $TMP5 


ERROR 


♦31 
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SEQUENCE 



2374 



S8TTL TEST * 26 - COUNT PATTERN IN KERNAL PAR'S 



•TEST 26 



COUNT PATTERN IN KERNAL PAR'S 



024026 


000004 






TST26: 


SCOPE 




024030 


004737 


002276 




20$: 


JSR 


PC, CLEANUP 


024034 


012737 


024044 


001110 




MOV 


*1$,$LPERR 


024042 


005001 








CLR 


R1 


024044 


012700 


1 72340 




1$: 


MOV 


/WCJPARO.RO 


024050 


010110 






2$: 


MOV 


R1 , (RO) 
(RO) ,R2 


024052 


011002 








MOV 


024054 


010104 








MOV 


R1 ,R4 


024056 


020402 








CMP 




024060 


001402 








BEQ 


3$ 


024062 


004737 


002400 






JSR 


PC.PARCOUNT 


024066 


062700 


000002 




3$: 


ADD 


*2.R0 


02^072 


022700 


1 72376 






CMP 


/lfKDPAR7.R0 


024076 


103364 








BHIS 


2$ 


024100 


022701 


Mini 






CMP 


*1 77777. R1 


024104 


001403 








BEQ 


4$ 


024106 


062701 


000401 






ADD 


*401.R1 


024112 


000754 








BR 


1$ 


024114 


012737 


024030 


001110 


4$: 


MOV 


*20$.$LPERR 


024122 


005737 


001322 






TST 


ERRCNT 


024126 


000404 








BR 


..T5T27 


024130 


013737 


001322 


001210 




MOV 


ERRCNT, $TMP5 


024136 


104032 








ERROR 


+32 



♦THIS TEST RUNS A COUNT PATTERN THR0U(iH THE KERNAL PAGE ADDRESS REGISTERS. 
*IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED, THE REGISTER ADDRESS. 
*DATA PATTERN. AND BAD DATA ARE REPORTED. AT THE END OF THE TEST A SUMMARY 
*0F ERRORS IS GIVEN. 



INITIALIZE ERROR LOCATIONS 

SET LOOP ON ERROR POINTER TO 1$ 

CLEAR REGISTER TO HOLD COUNT PATTERN 

PUT ADDRESS OF FIRST REGISTER INTO RO 

LOAD COUNT INTO REGISTER 

READ REGISTER BACK TO R2 

PUT PATTERN IN R4 

SEE IF DATA MATCHES PATTERN 

BRANCH IF DATA IS GOOD 

LOG AND REPORT COUNT ERROR 

POINT TO NEXT REGISTER 

SEE IF YOU PASSED THE KDPAR7 PAR 

BRANCH IF MORE TEST 

SEE IF COUNT HAS REACHED M7777 

BRANCH IF SO 

INCREASE COUNT PATTERN 

BRANCH TO CONTINUE TEST 

SET LOOP POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

.•BRANCH TO NEXT TEST IF NO ERRORS 

SAVE * OF ERRORS FOR TYPEOUT 

SUMMARY OF COUNT PATTERN FAILURES 
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SEQUENCE 69 



S8TTL TEST # 27 - CIX^T PATTERN IN SUPERVISOR PAR'S 



*TEST 27 



COUNT PATTERN JN SUPERVISOR PAR'S 



02AK0 


000004 






tST27: 


SCOPE 




02AK2 


004737 


002276 




20$: 


JSR 


PC, CLEANUP 


024 K6 


012737 


024156 


001110 




MOV 


/ri$.$LPERR 


0241 54 


005001 








CLR 


R1 


024156 


012700 


172240 




1$: 


MOV 


#SIPARO,RO 


024162 


010110 






2$: 


MOV 


RI.(RO) 
(R0),R2 


C24164 


011002 








MOV 


024166 


010104 








MOV 


R1,R4 


024170 


020402 








CMP 


R4.R2 


024172 


001402 








BEQ 


3S 


024174 


004737 


002400 






JSR 


PC.PARCOUNT 


024200 


062700 


000002 




3$: 


ADD 


*2.R0 


024204 


022700 


172276 






CMP 


XfSDPAR7.R0 


024210 


103364 








BHIS 


2$ 


024212 


022701 


Mim 






CMP 


*177777.R1 


024216 


001403 








BEQ 


4$ 


024220 


062701 


000401 






ADD 


#401 .R1 


024224 


000754 








BR 


1$ 


024226 


012737 


024142 


001110 


4$: 


MOV 


*20$,$LPERR 


024234 


005737 


001322 






TST 


ERRCNT 


024240 


000404 








BR 


TST30 


024242 


013737 


001322 


001210 




MOV 


ERRCNT, $TMP5 


024250 


104032 








ERROR 


+32 



•THIS TEST RUNS A COUNT PATTERN THROUGH THE SUPERVISOR PAGE ADDRESS REGISTERS. 
•IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED. THE REGISTER ADDRESS. 
•DATA PATTERN, AND BAD DATA ARE REPORTED. AT THE END Of THE TESf A SUMMARr 
•OF ERRORS IS GIVEN. 



INITIALIZE ERROR LOCATIONS 

SET LOOP ON ERROR POINTER TO 1$ 

CLEAR REGISTER TO HOLD COUNT PATTERN 

PUT ADDRESS OF FIRST REGISTER INTO RO 

LOAD COUNT INTO REGISTER 

READ REGISTER BACK TO R2 

PUT PATTERN IN R4 

SEE IF DATA MATCHES PATTERN 

BRANCH IF DATA IS GOOD 

LOG AND REPORT COUNT ERROR 

POINT TO NEXT REGISTER 

SEE IF YOU PASSED THE SDPAR7 PAR 

BRANCH IF MORE TEST 

SEE IF COUNT HAS REACHED M7777 

BRANCH IF SO 

INCREASE COUNT PATTERN 

BRANCH TO CONTINUE TEST 

SET LOOP POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

.•BRANCH TO NEXT TEST IF NO ERRORS 

SAVE # OF ERRORS FOR TYPEOUT 

SUMMARY OF COUNT PATTERN FAILURES 
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SEQUENCE 



?38A 











0047^7 


vvC C ' \J 






0?4?70 










VIC' w 


1 72340 




0101 10 






01 100? 

V 1 1 WC 




024300 


010104 




024302 


020402 




024304 


001402 




024306 


004737 


002400 


024312 


062700 


000002 


024316 


022700 


1 72376 


024322 


103364 




024324 


022701 


M7777 


024330 


001403 




024332 


062701 


000401 


024336 


000754 




024340 


012737 


024254 


024346 


005737 


001322 


024352 


000404 




024354 


013737 


001322 


024362 


104032 





001110 



001110 
001210 



S8TTL TEST # 30 - COUNT PATTERN IN USER PAR'S 



•TEST 30 



COUNT PATTERN IN USER PAR'S 



•THIS TEST RUNS A COUNT PATTERN THROUGH THE USER PAGE ADDRESS REGISTERS. 
•IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED. THE REGISTER ADDRESS, 
•DATA PATTERN. AND BAD DATA ARE REPORTED. AT THE END OF THE TEST A SUMMARY 
•OF ERRORS IS GIVEN. 



TST30: 
20S: 



IS: 

2$: 



3$: 



4S: 



SCOPE 

JSR PCjCLEANUP 

MOV #1$.$LPERR 

CLR R1 

MOV #KIPARO.RO 

MOV R1 . (RO) 

MOV (RO) .R2 

MOV R1 .R4 

CMP R4,R2 

BEO 3S 

JSR PC.PARCOUNT 

ADD *2.R0 

CMP /rKDPAR7,R0 

BHIS 2$ 

ZfP »\77777.\Ky 

BEO 4S 

ADD #401. R1 

BR 1S 

MOV #20S,$LPERR 

TST ERRCNT 

BR TST31 

MOV ERRCNT. $TMP5 

ERROR +32 



INITIALIZE ERROR LOCATIONS 

SET LOOP ON ERROR POINTER TO 1$ 

CLEAR REGISTER TO HOLD COUNT PATTERN 

PUT ADDRESS OF FIRST REGISTER INTO RO 

LOAD COUNT INTO REGISTER 

READ REGISTER BACK TO R2 

PUT PATTERN IN R4 

SEE IF DATA MATCHES PATTERN 

BRANCH IF DATA IS GOOD 

LOG AND REPORT COUNT ERROR 

POINT TO NEXT REGISTER 

SEE IF YOU PASSED THg KDPAft7 PAR 

BRANCH IF MORE TEST 

SEE IF COUNT HAS REACHED ^77777 

BMNCH IF SO 

I>JCREASE COUNT PATTERN 

BRANCH TO CONTINUE TEST 

SET LOOP POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

;BRANCH TO NEXT TEST IF NO ERRORS 

SAVE 0 OF ERRORS FOR TYPEOUT 

SUMMARY OF COUNT PATTERN FAILURES 
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6 

PAGE 60 



SEQUENCE 



2389 



024 36A 
2390 024366 
024372 
024400 
024402 
024406 
024410 
024412 
024414 
024420 
024422 
024424 
024430 
024434 
024440 
024442 
024446 
024450 
024454 
024456 
024464 
024470 
024472 
024500 



000004 
004737 
012737 
005001 
012700 
010110 
011002 
010104 
042704 
020402 
001402 
004737 
062700 
022700 
103362 
022701 
001403 
062701 
000752 
012737 
005737 
000404 
013737 
104032 



002276 
024402 

172300 



000361 

002400 
000002 
172336 

\77777 

000401 

024366 
001322 



001110 



S8TTL TEST # 31 - CCXJNT PATTERN IN KERNAL PDR'S 



•TEST 31 



COUNT PATTERN IN HERNAL PDR'S 



•THIS TEST RUNS A COUNT PATTERN THROUGH THE KERNAL PAGE DESCRIPTOR REGISTERS. 
•SINCE BITS <05:04> AND <0> ARE NOT INPLEMENTED, AND BITS <07:06> 
•CANNOT BE SET BY DIRECT LOAD. THEY ARE MASHED OUT OF THE DATA COMPARE. 
•THESE BITS ARE STILL SENT TO THE DESCRIPTOR REGISTER TO FIND BAD ETCHES. 
•IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED. THE REGISTER ADDRESS. 
•DATA PATTERN, AND BAD DATA ARE REPORTED. AT THE END OF THE TEST A Sl^flARY 
•OF ERRORS IS GIVEN. 
• ************ 



*************************************************** 



TST31 
20S: 



1$: 
2$: 



3$; 



001110 4$: 



001322 001210 



SCOPE 

JSR 

MOV 

CLR 

MOV 

MOV 

MOV 

MOV 

BIC 

CMP 

BEQ 

JSR 

ADD 

CMP 

BHIS 

CMP 

BEQ 

ADD 

BR 

MOV 

TST 

BR 

MOV 

ERROR 



PC. CLEANUP 
#1$.$LPERR 

R1 

*KIPDRO.RO 
RI.(RO) 
(R0).R2 
R1 R4 

*060361,R4 

R4.R2 

3$ 

PC, PAR COUNT 
*2,R0 

*KDPDR7.R0 
2$- 

*1 77777, R1 
4$ 

/lf401,R1 
1$ 

*20$.$LPERR 

ERRCNT 

TST32 

ERRCNT, $TMP5 
+32 



INITIALIZE ERROR LOCATIONS 

SET LOOP ON ERROR POINTER TO 1$ 

CLEAR REGISTER TO HOLD COUNT PATTERN 

PUT ADDRESS OF FIRST REGISTER INTO RO 

LOAD COUNT INTO REGISTER 

READ REGISTER BACK TO R2 

PUT PATTERN IN R4 

CLEAR BITS NOT FOUND IN REGISTER 

SEE IF DATA MATCHES PATTERN 

BRANCH IF DATA IS GOOD 

LOG AND REPORT COUNT ERROR 

POINT TO NEXT REGISTER 

SEE IF YOU PASSED THE KDPDR7 PDR 

BRANCH IF MORE TEST 

SEE IF COUNT HAS REACHED ^77777 

BRANCH IF SO 

INCREASE COUNT PATTERN 

BRANCH TO CONTINUE TEST 

SET LOOP POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

.BRANCH TO NEXT TEST IF NO ERRORS 

SAVE » OF ERRORS FOR TYPEOUT 

SUMMARY OF COUNT PATTERN FAILURES 
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H 

61 



SEQUENCE 



2394 



024502 
2395 024504 
024510 
024516 
024520 
024524 
024526 
024530 
024532 
024536 
024540 
024542 
024546 
024552 
024556 
024560 
024564 
024566 
024572 
024574 
024602 
024606 
024610 
024616 



S8TTL TEST f 32 - COUNT PATTERN IN SUPERVISOR PDR'S 



•TEST 32 



COUNT PATTERN IN SUPERVISOR PDR'S 



•THIS TEST RUNS A COUNT PATTERN THROUGH THE SUPERVISOR PAGE DESCRIPTOR REGISTERS. 
•SINCE BITS <05:04> AND <0> ARE NOT INPLEIiENTED. AND BITS <07:06> 
•CANNOT BE SET BY DIRECT LOAD. THEY ARE MASKED OUT OF THE DATA COMPARE. 
•THESE BITS ARE STILL SENT TO THE DESCRIPTOR REGISTER TO FIND BAD ETCHES. 
•IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED. THE REGISTER ADDRESS. 
•DATA PATTERN. AND BAD DATA ARE REPORTED. AT THE END OF THE TEST A SUMMARY 
•OF ERRORS IS GIVEN. 



INITIALIZE ERROR LOCATIONS 

SET LOOP ON ERROR POINTER TO IS 

CLEAR REGISTER TO HOLD COUNT PATTERN 

PUT ADDRESS OF FIRST REGISTER INTO RO 

LOAD COUNT INTO REGISTER 

READ REGISTER BACK TO R2 

PUT PATTERN IN R4 

CLEAR BITS NOT FOUND IN REGISTER 

SEE IF DATA MATCHES PATTFRN 

BRANCH IF DATA IS GOOD 

LOG AND REPORT COUNT ERROR 

POINT TO NEXT REGISTER 

SEE IF YOU PASSED THE SDPDR7 PDR 

BRANCH IF MORE TEST 

SEE IF COUNT HAS REACHED \777n 

BRANCH IF SO 

INCREASE COUNT PATTERN 

BRANCH TO CONTINUE TEST 

SET LOOP POINTER TO START OF TEST 

SEE IF THERE WERE ANY ERRORS 

.•BRANCH TO NEXT TEST IF NO ERRORS 

SAVE * OF ERRORS FOR TYPEOUT 

SUMMARY OF COUNT PATTERN FAILURES 



000004 






# # _ 

TST32: 


SCOPE 




004737 


002276 




20$: 


JSR 


PC. CLEANUP 


012737 


024520 


001110 




MOV 


*1$.$LPERR 


005001 








CLR 


R1 


012700 


172200 




1$: 


MOV 


*SIPDRO.RO 


010110 






2$: 


MOV 


RI.CRO) 
(RO) .R2 


011002 








MOV 


010104 








MOV 


R1.R4 


042704 


000361 






BIC 


Xf000361 .R4 


020402 








CMP 


R4.R2 


001402 








BEO 


3$ 


004737 


002400 






JSR 


PC.PARCOUNT 


062700 


000002 




3$: 


ADD 


*2,R0 


022700 


1 72236 






CMP 


*SDPDR7.R0 


103362 








BHIS 


2$ 


022701 


M7777 






CMP 


Xfl 77777. R1 


001403 








BEQ 


4$ 


062701 


000401 






ADD 


Xf401.R1 


000752 








BR 


1$ 


012737 


024504 


001110 


4$: 


MOV 


*20$.$LPERR 


005737 


001322 






TST 


ERRCNT 


000404 








BR 


TST33 


013737 


001322 


001210 




MOV 


ERRCNT. $TMP5 


104032 








ERROR 


+32 



I 6 
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TEST # 33 - COUNT PATTERN IN USER PDR'S 



SEQUENCE 



?399 



02A620 
2^00 024622 
024626 
024634 
024636 
024642 
024644 
024646 
024650 
024654 
024656 
024660 
024664 
024670 
024674 
024676 
024702 
024704 
024710 
024712 
024720 
024724 
024726 
024734 



000004 
004737 
012737 
005001 
012700 
010110 
011002 
010104 
042704 
020402 
001402 
004737 
062700 
022700 
103362 
022701 
001403 
062701 
000752 
012737 
005737 
000404 
013737 
104032 



002276 

024636 001110 
177600 



000361 

002400 
000002 
177636 

^77777 
000401 

024622 001110 
001322 

001322 001210 



S8TTL TEST # 33 - COUNT PATTERN IN USER PDR'S 



•TEST 33 



COUNT PATTERN IN USER PDR'S 



•THIS TEST RUNS A COUNT PATTERN THROUGH THE USER PAGE ADDRESS REGISTERS. 
•SINCE BITS <05:04> AND <0> ARE NOT INPLEMENTED. AW BITS <07:06> 
•CANNOT BE SET BY DIRECT LOAD. THEY ARE MASKED OUT OF THE DATA COMPARE. 
•THESE BITS ARE STILL SENT TO THE DESCRIPTOR REGISTER TO FIND BAD ETCHES. 
•IF THE COUNT PATTERN DOES NOT MATCH THE DATA RECEVIED. THE REGISTER ADDRESS. 
•DATA PATTERN, AND BAD DATA ARE REPORTED. AT THE END OF THE TEST A SUMMARY 
•OF ERRORS IS GIVEN. 

• •***#*******************•*******•*********•*********•#****•***• 

tST33: SCOPE 
20$: 



IS; 
2S: 



3S: 



4$: 



JSR 


PC. CLEANUP 


INITIALIZE ERROR LOCATIONS 


MOV 


#1$.SLPERR 


SET LOOP ON ERROR POINTER TO 1$ 


CLR 


R1 


CLEAR REGISTER TO HOLD COUNT PATTERN 


MOV 


*UJPDRO,RO , 


'PUT ADDRESS Or FIRST REGISTER INTO RO 


MOV 


RI.(RO) 


LOAD COUNT INTO REGISTER 


MOV 


(R0).R2 


READ REGISTER BACK TO R2 


MOV 


R1.R4 


•PUT PATTERN IN R4 


BIC 


#000361 ,R4 


■CLEAR BITS NOT FOUND IN REGISTER 


CIV 


R4.R2 


SEE IF DATA MATCHES PATTERN 


BEQ 


3$ 


-BRANCH IF DATA IS GOOD 


JSR 


PC.PARCOUNT 


-.'.OG AND REPORT COUNT ERROR 


ADD 


4r2.RO 


■TOINT TO NEXT REGISTER 


CMP 


/nJDPDR7,R0 


■SEE IF YOU PASSED THE UDPDR7 ODR 


BHIS 


2$ 


•Bi^CH IF MORE TEST 


CMP 


#1 77777. R1 


•SEE IF COUNT HAS REACHED 177777 


BEO 


4S 


iBRANCH IF SO 


ADD 


#401 .R1 


■INCREASE COUNT PATTERN 


BR 


1$ 


■BRANCH TO CONTINUE TEST 


MOV 


#20$.$LPERR 


;SET LOOP POINTER TO START OF TEST 


TST 


ERRCNT 


;SEE IF THERE WERE ANY ERRORS 


BR 


TST34 


•.•BRANCH TO NEXT TEST IF NO ERRORS 


MOV 


ERRCNT. $TMP5 


-SAVE # OF ERRORS FOR TYPEOUT 


ERROR 


+32 


■SUMPMRY OF COUNT PATTERN FAILURES 
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SEOUEI^CE 74 



2<.11 



S8TTL TEST # 34 - BYTE ADDRESSING OF KERf^L PAR'S 



TEST 34 



BYTE ADDRESSING OF KERNAL PAR'S 



THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 
OF KERNAL PAGE ADDRESS REGISTERS. IT CAN BE ASSUMED THAT 
ONE REGISTER WORKS, THEY ALL WORK BECAUSE THE REGISTERS 
HAVE ALL BEEN TESTED. 
********t ***************** 



IF 



024736 


000004 






TST34: 


SCOPE 






2412 024740 


012737 


024756 


001 1 1 0 


20$: 


MOV 


*11$,$LPERR 


SET LOOP ON ERROR POINTER TO 11$ 


024746 


012702 


000014 






MOV 


*14,R2 


F>UT EXPECTED DATA IN R2 






1 f 






MOV 


M^fOADA nA 

mK 1 PARO , RO , 


PUT ADDRESS Or RcGISTER IN RO 


024756 


005037 


172340 




11$: 


CLR 


KIPARO 


•CLEAR THE REGISTER UNDER TEST 


024762 


112710 


172014 






M0V8 


*172014.(R0) 


■LOAD LOWER BYTE OF REGISTER 


024766 


013701 


172340 






MOV 


KIPARO.Rl 


READ REGISTER INTO R1 


024772 


020102 








CMP 


R1 ,R2 


SEE IF ONLY LOWER BYTE WAS WRITTEN 


024774 


001401 








BEQ 


1$ 


BRANCH IF DATA MATCHES 
DIDN'T LOAD CORRECT BYTE 


024776 
025000 
025006 


104033 








ERROR 


+33 


012737 


025016 


001110 


IS: 


MOV 


*12$,$LPERR 


•SET LOOP ON ERROR POINTER TO 12$ 


012700 


172341 






MOV 


#KIPAfiO+1 .RO 


;POINT TO UPPER BYTE OF REGISTER 


025012 


012702 


052014 






MOV 


#52014. R2 


■LOAD EXPECTED DATA INTO R2 


025016 


112710 


000124 




12$: 


MOVE 


#124. (RO) 


•WRITE UPPER BYTE OF REGISTER 


025022 


013701 


172340 






MOV 


KIPARO.Rl 


■READ REGISTER INTO R1 


025026 


020102 








CMP 


R1.R2 


•SEE IF ONLY UPPER BYTE WAS WRITTEN 


025030 


001401 








BEQ 


2$ 


■BRANCH TO EXIT IF CORRECT 
•DIDN'T LOAD CORRECT BYTE 


025032 


104033 








ERROR 


*33 


025034 


012737 


02^7^,0 


001110 


2$: 


MOV 


#20$.$LPER.'? 


;SET LOOP POINTER TO START OF TEST 
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SEQUENCE 75 



2416 



2417 



025042 


000004 






TST35: 


SCOPE 




025044 


012737 


025062 


001110 


20S: 


MOV 


*11$.$LPERR 


025052 


012702 


000014 






MOV 


#14,R2 


025056 


012700 


172240 






MOV 


4rSIPAR0.R0 


025062 


005037 


172240 




IIS: 


CLR 


SIPARO 


025066 


112710 


172014 






M0V8 


#172014, (RO) 


025072 


013^01 


172240 






MOV 


SIPAR0,R1 


025076 


020102 








CMP 


R1.R2 


025100 


001401 








BEQ 


1S 


025102 
025104 


104033 








ERROR 


+33 


012737 


025122 


001110 


IS: 


MOV 


#12S,$LPERR 


025112 


012700 


172241 






MOV 


#SJPARO*1,R0 


025116 


012702 


052014 






MOV 


*52014.R2 


025122 


112710 


000124 




12S: 


MOVB 


#124. (RO) 


025126 


013701 


172240 






MOV 


SJPAR0,R1 


025132 


020102 








CMP 


R1,R2 


025134 


001401 








BEQ 


2S 


025136 


104033 








ERROR 


♦33 


025140 


012737 


025044 


001110 


2$: 


MOV 


#20$.$LPERR 



S8TTL TEST # 35 - BYTE ADDRESSING OF SUPERVISOR PAR'S 

A*********************************************************-***** 

TEST 35 BYTE ADDRESSING OF SUPERVISOR PAR'S 

THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 
OF SUPERVISOR PAGE ADDRESS REGISTERS. IT CAN BE ASSlflED THAT 
ONE REGISTER WORKS. THEY ALL WORK BECAUSE THE REGISTERS 
HAVE ALL BEEN TESTED. 



SET LOOP ON ERROR POINTER TO 11$ 

PUT EXPECTED DATA IN R2 

PUT ADDRESS OF REGISTER IN RO 

CLEAR THE REGISTER UNDER TEST 

LOAD LOWER BYTE OF REGISTER 

READ REGISTER INTO R1 

SEE IF ONLY LOWER BYTE WAS WRITTEN 

BRANCH IF DATA MATCHES 

DIDN'T LOAD CORRECT BYTE 

SET LOOP ON ERROR POINTER TO 12$ 

POINT TO UPPER BYTE OF REGISTER 

LOAD EXPECTED DATA INTO R2 

WRITE UPPER BYTE OF REGISTER 

READ REGISTER INTO R1 

SEE IF ONLY UPPER BYTE WAS WRITTEN 

BRANCH TO EXIT IF CORRECT 

DIDN'T LOAD CORRECT BYTE 

SET LOOP POINTER TO START OF TEST 



IF 



L 6 
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SEQUENCE 76 



025K6 
2422 025150 
025156 
025162 
025166 
025172 
025176 
025202 
025204 
025206 
025210 
025216 
025222 
025226 
025232 
025236 
025240 
025242 
025244 



000004 
012737 
012702 
012700 
005037 
112710 
013701 
020102 
001401 
104033 
012737 
012700 
012702 
112710 
013701 
020102 
001401 
104033 
012737 



025166 
000014 
177640 
177640 
172014 
177640 



025226 
177641 
052014 
000124 
177640 



S8TTL TEST # 36 - BYTE ADDRESSING OF USER PAR'S 
'test 56 BYTE ADDRESSING OF USER PAR'S 



001110 



001110 



025150 001110 



THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 
OF USER PAGE ADDRcSS REGISTERS. IT CAN BE ASSUMED THAT IF 
ONE REGISTER WORKS, THEY ALL WORK BECAUSE THE REGISTERS 
HAVE ALL BEEN TESTED. 
******** ************************* ****************************** 

SET LOOP ON ERROR POINTER TO 11$ 
PUT EXPECTED DATA IN R2 
PUT ADDRESS OF REGISTER IN RO 
CLEAR THE REGISTER UNDER TEST 
LOAD LOWER BYTE OF REGISTER 
READ REGISTER INTO R1 
SEE IF ONLY LOWER BYTE WAS WRITTEN 
BRANCH IF DATA MATCHES 
DIDN'T LOAD CORRECT BYTE 
SET LOOP ON ERROR POINTER TO 12$ 
POINT TO UPPER BYTE OF REGISTER 
LOAD EXPECTED DATA INTO R2 
WRITE UPPER BYTE OF REGISTER 
READ REGISTER INTO R1 
SEE IF ONLY UPPER BYTE WAS WRITTEN 
BRANCH TO EXIT IF CORRECT 
DIDN'T LOAD CORRECT BYTE 
SET LOOP POINTER TO START OF TEST 



TSTjo: 


dLOrc 




on* • 




i>1 1 C CI DCDO 






ifl L O? 
» 1 H #Kc 




Mn\/ 


iNIIPARO RO 


11$: 


CLR 


UIPARO 




MOVB 


*1 7201 4. (RO) 




MOV 


UIPARO. R1 




CMP 


R1,R2 




BEQ 


1$ 




ERROR 


♦33 


1$: 


MOV 


*12$.$LPERR 




MOV 


*UIPAR0*1 .RO 




MOV 


*52014,R2 


12$: 


MOVB 


#124. (RO) 




MOV 


UIPARO. R1 




CMP 


R1.R2 




BEQ 


2$ 




ERROR 


+33 


2$: 


MOV 


#20$.$LPERR 
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SEQUENCE 77 



025252 
2427 025254 
025262 
025266 
025272 
025276 
025502 
025306 
025310 
025312 
0253H 
025322 
025326 
025332 
025336 
025342 
025344 
025346 
025350 



.S8TTL TEST # 37 - BYTE ADDRESSING OF KERNAL PDR'S 
••***»»**********•*•**•******************•**•*************«**•••• 

;*TEST 37 BYTE ADDRESSING OF KERNAL PDR'S 

:* THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 

;* OF KERNAL PAGE DESCRIPTOR REGISTERS. IT CAN BE ASSlflED THAT 

ONE REGISTER WORKS, THEY ALL WORK BECAUSE THE REGISTERS 
;* HAVE ALL BEEN TESTED. 



SET LOOP ON ERROR POINTER TO IIS 

PUT EXPECTED DATA IN R2 , 

PUT ADDRESS OF REGISTER IN RO V 

CLEAR THE REGISTER UNDER TEST 

LOAD LOWER BYTE OF REGISTER 

READ REGISTER INTO R1 

SEE IF ONLY LOWER BYTE WAS WRITTEN 

BRANCH IF DATA HATCHES 

DIDN'T LOAD CORRECT BYTE 

SET LOOP ON ERROR POINTER TO 12S 

POINT TO UPPER BYTE OF REGISTER 

LOAD EXPECTED DATA INTO R2 

WRITE UPPER BYTE OF REGISTER 

READ REGISTER INTO R1 

SEE IF ONLY UPPER BYTE WAS WRITTEN 

BRANCH TO EXIT IF CORRECT 

DIDN'T LOAD CORRECT BYTE 

SET LOOP POINTER TO START OF TEST 



IF 



000004 






tST37: 


SCOPE 




012737 


025272 


001110 


20S: 


(iOV 


#11S,$LPERR 


012702 


000014 






nov 




012700 


172300 






MOV 


#KIPDRO,RO 


005037 


1 72300 




IIS: 


CLR 


KIPDRO 


112710 


172014 






novB 


M^ 72014. (RO) 


013701 


172300 






MOV 


KIPDR0,R1 


020102 








CMP 


R1.R2 


001401 








BEQ 


IS 


104033 








ERROR 


♦33 


012737 


025332 


001110 


IS: 


MOV 


#12S,SLPERR 


012700 


172301 






MOV 


iWCIPDRO^^l ,R0 


012702 


052014 






MOV 


#5201 4, R2 


112710 


000124 




12$: 


MOVB 


#124, (RO) 


013701 


172300 






MOV 


KIPDR0,R1 


020102 








CMP 


R1.R2 


001401 








3i<i 


2S 


104033 








ZkROR 


♦33 


012737 


025254 


001110 


2S: 


MOV 


#20S,SLPERR 



I 



4 
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2431 



025356 
2432 025360 
025366 
025372 
025376 
025402 
025406 
025412 
025414 
025416 
025420 
025426 
025432 
025436 
' 025442 
025446 
025450 
025452 
025454 



000004 
012737 
012702 
012700 
005037 
112710 
013701 
020102 
001401 
104033 
012737 
012700 
012702 
,112710 
013701 
020102 
001401 
104033 
012737 



000014 
172200 
172200 
172014 
172200 



172201 
052014 
000124 
172200 



SBTTL TEST # 40 - BYTE ADDRESSING OF SUPERVISOR PDR'S 
'test 40 BYTE ADDRESSING OF SUPERVISOR PDR'S 



THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 

OF KERNAL PAGE DESCRIPTOR REGISTERS. IT CAN BE ASSUMED THAT IF 

ONE REGISTER WORKS, THEY ALL WORK BECAUSE THE REGISTERS 

HAVE ALL BEEN TESTED. 



025360 001110 2$: 



1 O 1 •tv • 


o w» t 




SET LOOP ON ERROR F>0INTER TO 11$ 




MOV 


#11$ $LPERR 




MOV 


#14 R2 


PUT EXPECTED DATA IN R2 




MOV 


#SIPDRO RO 


PUT ADDRESS OF REGISTER IN RO 


11$: 


CLR 


SIPDRO 


CLEAR THE REGISTER UNDER TEST 




MOVB 


#1 72014, (RO) 


•LOAD LOWER BYTE OF REGISTER 




MOV 


SIPDRO. R1 


READ REGISTER INTO Rl 




CMP 


Rl .R2 


•SEE IF ONLY LOWER BYTE WAS WRITTEN 




BEQ 


1$ 


•BRANCH IF DATA MATCHES 




ERROR 


♦33 


■DIDN'T LOAD CORRECT BYTE 


1$: 


MOV 


#12$,$LPERR 


;SET LOOP ON ERROR POINTER TO 12$ 




MOV 


#SIPDR0*1 ,R0 


; POINT TO UPPER BYTE OF REGISTER 




MOV 


#5201 4, R2 


;LOAD E)(PECTED DATA INTO R2 


12$: 


MOVB 


#124. (RO) 


; WRITE UPPER BYTE OF REGISTER 




MOV 


SIPDRO. Rl 


;READ REGISTER INTO Rl 




CMP 


R1.R2 


;SEE IF ONLY UPPER BYTE WAS WRITTEN 




BEQ 


2$ 


;BRANCH TO EXIT IF CORRECT 
; DIDN'T LOAD CORRECT BYTE 




ERROR 


+33 


2$: 


MOV 


*20$.$LPERR 


:SET LOOP POINTER TO START OF TEST 



? 
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seouf^CE 79 



025A62 

025*72 
025476 
025502 
025506 
025512 
025516 
025520 
025522 
025524 
025532 
025536 
025542 
025546 
025552 
025554 
025556 
025560 



.SSTTL TEST # 41 - BYTE ADDRESSING OF USER PDR'S 



.••TEST 41 



BYTE ADDRESSING Of USER PDR'S 



000004 






TST41 : 


SCOPE 




012737 


025502 


001110 


20S: 


MOV 


#11$,SLPERR 


012702 


000014 






MOV 


#14, R2 


012700 


177600 






MOV 


#ui pdro.ro 


005037^ 


177600 




lift. 


LLH 


1 Iff DAon 


112710 


172014 






MOVB 


#172014. (RO) 


013701 


177600 






MOV 


UIPDRO.RI 


020102 








CMP 


R1.R2 


001401 








BEO 


IS 


104033 








ERROR 


♦33 


012737 


025542 


oomo 


IS: 


MOV 


#12S.SLPERR 


012700 


177601 






MOV 


#UIP0R0*1 .RO 


012702 


052014 






MOV 


#52014. R2 


112710 


000124 




12$: 


M0V8 


#124. (RO) 


013701 


177600 






MOV 


UIPDRO.RI 


020102 








CMP 


R1.R2 


001401 








BEQ 


2S 


104033 








ERROR 


♦33 


012737 


025464 


001110 


2S: 


MOV 


#20S.SLPERR 



THIS TEST CHECK THE LOGIC ASSOCIATED WITH BYTE ADDRESSING 
Of USER PAGE DESCRIPTOR REGISTERS. IT CAN BE ASSLflED THAT IF 
ONE REGISTER VORKS. THEY ALL WORK BECAUSE THE REGISTERS 
HAVE ALL BEEN TESTED. 



SET LOOP ON ERROR POINTER TO US 

PUT EXPECTED DATA IN R2 

PUT ADDRESS Of REGISTER IN RO 

CLEAR THE REGISTER UNDER TEST 

LOAD LOUER BYTE Of REGISTER 

READ REGISTER INTO R1 

SEE If ONLY LOUER BYTE UAS WRITTEN 

BRANCH If DATA HATCHES 

DIDN'T LOAD CORRECT BYTE 

SET LOOP ON ERROR POINTER TO 12S 

POINT TO UPPER BYTE OF REGISTER 

LOAD EXPECTED DATA INTO R2 

WRITE UPPER BYTE OF REGISTER 

READ REGISTER INTO R1 

SEE IF ONLY UPPER BYTE WAS WRITTEN 

BRANCH TO EXIT IF CORRECT 

DIDN'T LOAD CORRECT BYTE 

SET LOOP POINTER TO START OF TEST 



C 7 
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SEQUENCE 8C 



<?451 



025566 

2452 025570 

2453 025576 
2454 

2455 025600 

2456 025604 

2457 025610 

2458 025614 

2459 025616 

2460 025622 

2461 025630 

2462 025634 

2463 025640 

2464 025642 

2465 025644 

2466 025650 

2467 025652 

2468 025654 



S8TTL TEST # 42 - DUAL ADDRESSING FOR ALL PAR'S & PDR'S 
'test 42 DUAL ADDRESSING FOR ALL PAR'S I PDR'S 



THIS TEST WILL ENSURE THAT THERE IS NO DUAL ADDRESSING 
BETWEEN GROUPS OF PAR'S AND PDR'S. THAT IS. yHEN YOU 
REFERENCE A KERNAL I-SPACE PAR YOU ARE REALLY REFERENCING 
THAT PAR. FIRST EACH I-SPACE PARO OR PDRO IS LOADED WITH 
A UNIQUE NLTBER 0-12 AND THEN THEY ARE EACH CHECKED FOR 
THE CORRECT DATA. 

EACH GROUP HAS ALREADY BEEN TESTED FOR DUAL ADDRESSING 
WITHIN ITS OWN GROUP. SO ONLY ONE REGISTER FROM EACH 
GROUP NEEDS TO BE TESTED. 



000004 






TST42: 


SCOPE 






012737 


025604 


001110 


20$: 


MOV 


#1$.$LPERR 


SET LOOP ON ERROR POINTER TO 1$ 


005000 






CLR 


RO 


THIS WILl HOLD THE INDEX OF EACH 












REGISTER, AND THE COUNT LOADED. 


012704 


000006 






MOV 


4r6.R4 


NUMBER OF TIMES TO DO THE LOOP 


010070 


001356 




IS: 


MOV 


RO.aPARTAB(RO) , 


•LOAD PAR OR POR WITH INDEX NUMBER 


062700 


000002 






ADD 


M2.R0 


•CHANGE INDEX TO POINT TO NEX^ REGISTER 


077405 








SOB 


R4.1$ 


■BRANCH BACK 5 TIMES 


012704 


000006 






MOV 


#6,R4 


•DO NEXT LOOP 6 TIMES 


013737 


025634 


001110 




MOV 


10$.$LPERR 


•SET LOOP ON ERROR POINTER TO 10$ 


162700 


000002 




2$: 


SUB 


M2. RO 


rADJUST INDEX FOR REGISTER DESIRED 


017001 


001356 




10$: 


MOV 


aPARTAB(R0).R1 


;READ PAR OR PDR INTO R1 


020001 








CMP 


R0.R1 


;SEE IF INDEX EQUALS DATA 


001403 








BEQ 


3$ 


;BRANCH IF INCORRECT REGISTER WAS READ 


016002 


001356 






MOV 


PARTA8(R0).R2 


;SAVE ADDRESS OF BAD REGISTER 


104016 








ERROR 


♦16 


;DUAL ADDRESSING ERROR 


077412 






3$: 


SOB 


R4.2$ 


;6RANCH BACK 5 TIMES 


012737 


025570 


001110 




MOV 


#20$.$LPERR 


;SET LOOP ON ERROR POINTER TO START OF TEST 



I 



CKKTABO 11/^4 MEM MGMT PRT A MACRO M1113 23-APfi-81 13:32 
TEST # 43 - TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 



D 

PAGE 70 



SEQUENCE 81 



2478 



025662 

2479 025664 

2480 025670 

2481 025674 

2482 025700 

2483 025704 

2484 025710 

2485 025712 

2486 025716 

2487 025722 

2488 025726 

2489 025732 

2490 025736 

2491 025740 

2492 025744 

2493 025750 

2494 025754 

2495 025760 

2496 025764 

2497 025766 

2498 025770 

2499 025774 

2500 026000 

2501 0260C 

2502 026006 

2503 026010 
2504 

2505 
2506 

2507 026012 

2508 026016 

2509 026020 

2510 026024 

2511 026030 

2512 026032 

2513 026036 

2514 026040 
2515 

2516 
2517 

2518 026042 

2519 026046 

2520 026050 

2521 026054 

2522 026060 

2523 026062 



000004 
012703 
012701 
012702 
012721 
012722 
077305 
012703 
012701 
012702 
012721 
012722 
077305 
012703 
012701 
012702 
012721 
012722 
077305 
000005 
012700 
012704 
011001 
022701 
001401 
104023 



062700 
077410 
012700 
012704 
011001 
022701 
001401 
104023 



062700 
077410 
012700 
012704 
011001 
022701 



000020 
172300 
1 72340 
M7777 
-[77777 

000020 
172200 
172240 
-[77777 
-[77777 

000020 
177600 
177640 
\77777 
y77777 



172300 
000020 

177416 



000002 

172340 
000020 

1 77777 



000002 

172200 
000020 

177416 



S8TTL TEST * 43 - TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 
TEST THAT PAR-PDR'S NOT AFFECTED BY RESET 



*TEST 43 



THIS TEST CHECKS TO SEE THAT THE KERNEL, SUPERVISOR OR USER 
PAR/PDR'S ARE NOT AFFECTED BY THE EXECUTION OF A 'T^ESET" 
INSTRUCTION. ALL WRITEABLE BITS ARE SET TO A 'T' IN THE 
PAR/PDR'S; THEY ARE THEN READ TO SEE THAT THEY REMAINED 
LMCHANGED. 



TST43: 
1$: 



21$: 



22$: 



23$: 



2$: 



3$: 



4$: 



5$; 



6$: 



SCOPE 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

RESET 

MOV 

MOV 

MOV 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 



#20, R3 

#KIPOR0,R1 

#KIPAR0,R2 

#-1,(R1)* 

#-1,(R2)* 

R3,21$ 

#20, R3 

#SIPDR0,R1 

#SIPAR0,R2 

#-1,(R1)* 

/r-i,(R2)* 

R3.22$ 

#26,R3 

#UIPDR0,R1 

#UIPAR0,R2 

#-i,(R1)* 

#-1.(R2)* 

R3,53$ 

#KIPDRO,RO 

#20, R4 

(R0),R1 

#177416, R1 

3$ 

♦23 



#2,R0 
R4,2$ 

#KIPARO,RO 
#20. R4 

{R0),R1 
#1 77777, R1 
5$ 
♦23 



#2.R0 
R4,4$ 

#SIPDRO.RO 
#20. R4 
(RO).RI 
#1 77416. R1 



LOAD LOOP COUNTER WITH A 16 

LOAD FIRST ADDRESS OF PDR INTO R1 

LOAD FIRST ADDRESS OF PAR INTO R2 

SET BITS IN PDR TO 1'S 

SET BITS IN PAR'S TO 1 'S 

LOOP UNTIL ALL KERNAL PAR/PDR'S LOADED 

LOAD LOOP COUNTER WITH A 16 

LOAD FIRST ADDRESS OF PDR INTO R1 

LOAD FIRST ADDRESS OF PAR INTO R2 

SET BITS IN PDR TO I'S 

SET BITS IN PAR'S TO I'S 

LOOP UNTIL ALL SUPERVISOR PAR/PDR'S LOADED 

LOAD LOOP COUNTER WITH A 16 

LOAD FIRST ADDRESS OF PDR INTO R1 

LOAD FIRST ADDRESS OF PAR INTO R2 

SET BITS IN PDR TO I'S 

SET BITS IN PAR'S TO I'S 

LOOP UNTIL ALL USER PAR/PDR'S LOADED 

ISSUE AN "INir* BY EXECUTING A RESET 

LOAD ADDRESS OF FIRST KERNEL PDR IN RO 

LOAD LOOP COUNTER WITH A 16 

READ A KERNEL PDR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF YES 

KERNEL PDR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

•BR 2$" = 000773 

FORM ADDRESS OF NEXT KERNEL PDR 

LOOP TO 2$ UNTIL ALL KERNEL PDR'S CHECKED 

LOAD ADDRESS OF FIRST KERNEL PAR IN RO 

LOAD LOOP COUNTER WITH A 16 

READ A KERNEL PAR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF YES 

KERNEL PAR AFFECTED BY A RESET 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'8R 4$" = 000773 

FORM ADDRESS OF NEXT KERNEL PAR 

LOOP TO 4$ UNTIL ALL KERNEL PAR'S CHECKED 

LOAD ADDRESS OF FIRST SUPERVISOR PDR IN RO 

LOAD LOOP COUNTER WITH A 16 

READ A SUPERVISOR PDR INTO R1 

ARE ALL THE BITS STILL SET? 
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70- 



2524 

2525 

2526 

2527 

2528 

2529 

2530 

2531 

2532 

2533 

2534 

2535 

2536 

2537 

2538 

2539 

2540 

2541 

2542 

2543 

2544 

2545 

2546 

2547 

2548 

2549 

2550 

2551 

2552 

2553 

2554 

2555 

2556 

2557 

2558 

2559 

2560 

2561 

2562 

2563 



026066 
026070 



026072 
026076 
026100 
026104 
026110 
026112 
026116 
026120 



026122 
026126 
026130 
026134 
026140 
026142 
026146 
026150 



026152 
0261 56 
026160 
026164 
0261 70 
026172 
026176 
026200 



026202 
026206 



00140^ 
104023 



062700 
077410 
012700 
012704 
011001 
022701 
001401 
104023 



062700 
077410 
012700 
012704 
011001 
022701 
001401 
104023 



062700 
077410 
012700 
012704 
011001 
022701 
001401 
104023 



062700 
077410 



000002 

172240 
000020 



000002 

1 77600 
000020 

177416 



000002 

177640 
000020 

M7777 



000002 



7$: 



8S: 



9S: 



10S: 



11$: 



12J: 



13$: 



BEQ 
ERROR 



ADD 
SOB 
MOV 
flOV 
MOV 
CMP 
BFQ 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 
SOB 
MOV 
MOV 
MOV 
CMP 
BEQ 
ERROR 



ADD 

SOB 



7$ 

♦23 



#2.R0 
R4.6$ 

#SJPARO,RO 
#20, R4 
(RO)-RI 

M^77>77.f^^ 

9$ 

♦23 



#2.R0 
R4.8$ 

#UIPDR0.R0 

#20. R4 

(RO).RI 

#1 77416. R1 

11$ 

♦23 



#2.R0 

R4.10$ 

#UIPARO,RO 

#20. R4 

(RO).RI 

M^77777.R^ 

13$ 

♦23 



#2.R0 
R4.12$ 



SEQUENCE 82 



BRANCH If VES 

SUPERVISOR PDR AFFECTED BV A RESET 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 6$" = 000773 

FORM ADDRESS OF NEXT SUPERVISOR PDR 

LOOP TO 6$ UNTIL ALL SUPERVISOR PDR'S CHECKED 

LOAD ADDRESS OF FIRST SUPERVISOR PAR IN RO 

LOAD LOOP COUNTER WITH A 16 

READ A SUPERVISOR PAR INTO R1 

ARE ALL THE BITS STILL SET? 

BRANCH IF YES 

SUPERVISOR PAR AFFECTED BY A RESET 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
•BR 8$" = 000773 

;FORM ADDRESS OF NEXT SUPERVISOR PAP 

;LOOP TO 8$ UNTIL ALL SUPERVISOR PAR'S CHECKED 

iLOAD ADDRESS OF FIRST USER PDR WITH RO 

;LOAD LOOP COUNTER WITH A 16 

;READ A USER PDR INTO R1 

;ARE ALL THE BITS STILL SET? 

;6RANCH IF YES 

;USER PDR AFFECTED BY A RESET 

;FOR TIGHTER SCOPE LOOP 

; REPLACE ERROR CALL WITH 

;'8R 10$" = 000773 

;F0RM ADDRESS OF NEXT USER PDR 

;LOOP TO 10$ UNTIL ALL USER PDR'S CHECKED 

;L0AD ADDRESS OF FIRST USER PAR IN RO 

;LOAD LOOP COUNTER WITH A 16 

;READ A USER PAR INTO R1 

;ARE ALL THE BITS STILL SET? 

;BRANCH IF YES 

rUSER PAR AFFECTED BY A RESET 

;FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

;-8ft 12$" = 000773 

;F0Rf1 ADDRESS OF NEXT USER PAR 

;LOOP TO 12$ UNTIL ALL USER PAR'S CHECKED 
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SEQUENCE 



2576 



2577 
2578 
2579 
2580 
2581 
2582 
2583 
2584 
2585 
2586 
2587 
2588 
2589 
2590 
2591 
2592 
2593 
2594 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 



026210 
026212 
026216 
026222 
026226 
026230 
026232 
0262A0 



D262AA 
026252 
026260 
026266 
026270 
026276 
026300 
026304 



026306 
026312 
026316 
026324 
026332 
026340 



000004 
004737 
012700 
012704 
005020 
077402 
012737 
005037 



012737 
012737 
012737 
000005 
032737 
001403 
005037 
104024 



012706 
005037 
012737 
012737 
012737 
004737 



001100 
177572 
003330 
000340 
026212 
002226 



S8TTL TEST * 44 - INST. FETCH NOT RELOCATED IN MAINT. MODE 



TEST 44 



INST. FETCH NOT RELOCATED IN MAINT. MODE 



002172 
1 72300 
000010 



000252 000250 
000252 



001006 172300 

026260 001110 

000400 177572 

000400 177572 

1 77^72 



TST44: 
1$: 



2$: 



3$: 



4S: 



000250 
000252 
001110 



THIS TEST CHECKS TO SEE THAT yHEN MEMORY MANAGEMENT IS IN 
MAINTENANCE MODE (DESTJNATION-ONLY-RELOCATION) . AN INSTRUCTION 
FETCH IS NOT RELOCATED AND A RESET CLEARS THE MAINTENANCE BIT 
(BIT 08) IN SRO. IF THE 'TETCH" IS RELOCATED. A PG. LENGTH A8CRT 
SHOULD OCCUR. CAUSING A HALT SINCE TRAP CATCHER IS PLACED IN VECTOR 250 



NOTE; 



A HALT MAY OCCUR IF MAINT. MODE NOT DISABLED BY RESET 



SCOPE 

JSR PC. TOFF 

MOV *KIPDRO.RO 

MOV *10.R4 

CLR (RO)* 

SOe R4.2$ 

MOV #MMVEC*2,MMVEC 

CLR MMVEC+2 



MOV *1006,KIPDR0 

MOV #3$.$LPERR 

MOV *8IT8.SR0 
RESET 

BIT 4QIT8.SR0 

BEO 4$ 

CLR SRO 

ERROR +24 



MOV *KERSTK.KSP 

CLR SRO 

MOV #MGMERR,MMVEC 

MOV #340,MMVEC*2 

MOV *1S.$LPERR 

JSR PC. TON 



TURN T-eiT TRAPPING OFF FOR THIS TEST 
LOAD ADDRESS OF FIRST KERNEL POR INTO RO 
LOAD LOOP COUNTER WITH AN 8 
CLEAR PDR - MAPPING PAGE NON-RES. 0 BLKS. 
LOOP TO 2$ UNTIL ALL KERNEL PDR'S CLEAREP 
LOAD TRAP CATCHER INTO MEM MGM. VECTOR 

A HALT WILL OCCUR IF RESET FAILS 
TO DISABLE DEST.-ONLY RELOCATION 
MAP KERNEL PG 0 R/W. 3 BLOCKS LONG. 
SET LOOP ON ERROR POINTER TO 3$ 
TURN ON DEST-ONLY-RELOCATION 

SHOULD CLEAR^ MAINT. BIT - WILL ABORT IF RELOCATED 
WAS MAINT. BIT (BIT 8) OF SRO CLEARED? 
BRANCH IF YES 

CLEAR SRO SO ERROR CAN BE REPORTED 

MAINT. MODE NOT DISABLED BY A RESET 

FOR A TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

'BR 3$" = 000765 

RESTORE STACK POINTER 

BE SURE SRO IS CLEAR 

RESTORE MEM. MGMT. TRAP VECTOR 

RESTORE MEM. MGMT VECTOR+2 

RESET LOOP ON ERROR POINTER TO 1$ 

TURN T-eiT TRAPPING BACK ON 



G 7 

CKKT/«) n/AA ME« «G«T PRT A MACRO Hill 3 23-APR-81 13:32 PAGE 12 
TEST # «5 - TEST THAT SOURCE NOT RELOCATED IN MAINT. NODE 



SEQUENCE 84 



2616 







UUVJUU4 






3<v 7 


Uc03*»o 




AO 01 70 




<:o 10 


UcOjjc 


m 5777 

\J\cf5f 


noA/./. 0 


nn 1 1 1 n 


CD 1 V 


UcDJOU 


r>1 0777 


UUwUU 


1 707/.A 


T/, -J/N 




A1 0777 




1 f cjjV 






m 7777 


OUU 


1 707^A 








1 707fVl. 




COCJ 




ni 0777 

yjt CI Jf 


n77Af\* 
Ur f hUO 


1 7071 n 




Uco*» («• 


m 0777 




1 7071 A 
1 1 CJ I o 






ni 0777 

\JlCfJt 


rtOA^OO 
UcO0^£ 






Uco*>X; 


n^ 0777 


fW1777 


UOvUUU 


COCf 




m 07An 

U 1 crW 


1 77777 

\ 1 1 ( ( I 




eOcO 




n^0777 




1 77«;70 
i f t jf c 






1 1 7777 


UOUvUv 


1 nnnni 


coyj 




uwwo 






CO J 1 




ni 77ni 


AAnnnn 
uouuuu 




























i/v.no«; 

iUmUc 0 


























2637 










2638 










2639 


026472 


012737 


003330 


000250 


2640 


026500 


012737 


077^,06 


172306 


2641 


026506 


012737 


026346 


001110 


2642 


026514 


004737 


002226 




2643 


026520 


000430 






2644 










2645 


026522 


042737 


000400 


1 77572 


2646 


026530 


013737 


}77572 


001264 


2647 


026536 


013737 


177576 


001270 


2648 


026544 


010637 


001256 




2649 


026550 


012637 


001260 




2650 


026554 


012637 


001262 




2651 


026560 


042737 


160000 


M7572 


2652 


026566 


104026 






2653 










2654 










2655 










2656 


026570 


013746 


001262 




2657 


026574 


013746 


001260 





S8TTL TEST # 45 - TEST THAT SOURCE NOT RELOCATED IN flAJNT. MODE 

'test 45 TEST THAT SOURCE NOT RELOCATED IN MAINT. NODE 

THIS TEST CHECKS TO SEE THAT WHEN MEMORY MANAGEMENT IS IN 
MAINTENANCE MODE. THE SOURCE IS NOT RELOCATED; ONLY THE 
DESTINATION IS RELOCATED. KERNEL PAR'S 3 4 ARE MAPPED TO 
PHYSICAL ADDRESS 60000-77776. PDR4 IS SET TO ALLOW FULL 
READ/WRITE BUT PDR3 IS CLEAR ALLOWING NO ACCESS. VIRTUAL 
ADDRESSES REFERENCING PAR/PDR'S 4 3 ARE USED AS 
DESTINATION AND SOURCE RESPECTIVELY. IF THE SOURCE IS 
RELOCATED IN MAINTENANCE MODE A MEM. MGMT. TRAP WILL OCCUR 
AND THE ERROR WILL BE REPORTED. KERNEL PG. 7 IS MAPPED P/W. 



TST45: 
1$: 



2$: 



3$: 



4S: 



SCOPE 

JSR PC. TOFF 

MOV *2$,$LPERR 

MOV #600.KIPAR3 

MOV /r600.KlPAR4 

MOV *7600.KIPAR7 

CLR KIPDR3 

MOV #77406.KIPDR4 

MOV *77406,KIPDR7 

MOV #4$,MMVEC 

MOV #377,60000 

MOV #-1 ,R0 

BIS 4IBIT8.SR0 

M0V8 60000.100001 
RESET 

MOV 60000.R1 

CMP R0.R1 

BEO 3S 

ERROR +25 



MOV 4WGMERR.HMVEC 

MOV /r77406.KlPDR3 

MOV #1$,$LPERR 

JSR PC. TON 

BR TST46 



TURN OFF T-eiT TRAPPING FOR THIS 
SET LOOP ON ERROR POINTER TO 2$ 



TEST 



MAP KERNAL PAGE 
MAP KERNAL PAGE 
MAP KERNAL PAGE 
MAP KERNAL PAGE 
MAP KERNAL PAGE 
MAP KERNAL PAGE 
SET M.M. VECTOR 



3 
4 
7 
3 
4 
7 



TO 12-16K 
TO 12-16K 
TO THE I/O PAGE 
'no ACCESS" 
R/W, 128 BLKS 
R/W, 128 BLKS 
TO 4$ IN CASE OF ABORT 
LOAD ALL rS IN LOW BYTE OF TEST LOC. 
LOAD EXPECTED CONTENTS OF TEST LOC. IN RO 
TURN ON OEST. -ONLY-RELOCATION 

LOAD HJ BYTE OF TEST LOC. -ABORT IF SOURCE RELOCATED 

TURN OFF DEST. -ONLY-RELOCATION 

READ CONTENTS OF TEST LOC. 

WAS TEST LOCATION LOADED PROPERLY? 

BRANCH IF YES 

TEST LOC. NOT LOADED - INST. WAS ABORTED 
WHEN SOURCE WAS RELOCATED 
FOR TIGHTER SCOPE LOOP REPLACE 
ERROR CALL WITH 
■BR 2$" = 000764 
RESTORE HEM. MGMT. VECTOR 
MAP KERNAL PAGE 3 R/W, 128 BLKS 
RESET LOOP ON ERROR POINTER TO 1$ 
TURN THBJT TRAPPING BACK ON 
.-SKIP TO NEXT TEST 



;• IF THE PROGRAM TRIES TO RELOCATE THE SOURCE. IT SHOULD TRAP TO 4$ 



BIC *BIT8.SR0 

MOV SRO.WASSRO 

MOV SR2.WASSR2 

MOV SP.WASR6 

MOV (SP)*,TRAPPC 

MOV (SP)+.TRAPPS 

BIf #1 60000, SRO 

ERROR +26 



MOV TRAPPS.-(SP) 
MOV TRAPPC,-(SP) 



TURN OFF DEST. -ONLY-RELOCATION THRU PAR/POR 
SAVE REST OF SRO CONTENTS 
SAVE CONTENTS OF SR2 
SAVE VALUE OF THE STACK POINTER 
SAVE PC OF TRAP 
SAVE PSW OF TRAP 
CLEAR ERROR BITS IN SRO 

SOURCE APPARENTLY RELOCATED IN MAINT. MODE 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH A 
"NOP" = 000240 

PUT PSW OF TRAP BACK ON THE STACK 
PUT PC OF TRAP BACK ON THE STACK 
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TEST # 45 - TEST THAT SOURCE NOT RELOCATED IN MAINT. MODE 

2658 02t)600 000002 RT] .RETURN TO TEST 
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ADDER TESTS 



?659 .S8TTL ADDER TESTS 

2660 

2661 ; GROUP 3 ADDER TESTS 

2662 ;; • < 



CKKTABO 11/44 ME« WGMT PRT A MACRO H1113 
TEST # 46 - 18-eiT P1APPING ADDER TEST 



J 7 

23-APR-81 13; 32 PAGE 74 



SEOUEMCE 87 



2674 



18-81 T MAPPING ADDER TEST 







ft/VW\Z. 






1 d 1 hO • 


SCOPE 




COfj 












THE FOLLOWING CODE CLE/ 


7/. 7 A 












THE RELOCATION ADDERS 
I -SPACE PAR'S AND PDRV 


COf f 












COfO 


vcoou** 


ni ?7ft^ 


1 7??nn 






nuv 




CO' ▼ 


UcOO 1 KJ 


U 1 c f U*f 


nnni nn 






nuv 


irinn PL 




W jUC J 






1$ ■ 






cOO 1 


UcOO 1 O 


077402 










OL It 




ft?/sA?n 

UcOOcU 


ni ?7ns 

w 1 c f v J 


1 77Ann 






nuv 




cOOj 




ni ?7n^ 


lA/wwHw 






MOW 

nuv 


#^n P^ 

w"fv #nH 




UcOO.J\^ 


nnsnps 

Uv JVC J 






P4 • 


n P 




cOO J 


l/COO^C 


n77in? 

Uf f HUC 










R4 Pt 

#10 PP 
w 1 V #nc 


cOoO 


UcOOj** 


ni ?7n? 

U 1 c f wc 


nnnoin 




J9 . 


MOV 


cOO' 


vcOOHw 


ni ?7ni 


17? ^00 






rnj V 


incipopn PI 


cOOO 


wcOOHH 


ni ?7?i 

U 1 C r C 1 








MOV 


#77406 (RD-f 






n77pn^ 








^np 


RP 41 
nc # 

#P00 KfPARI 




UcOO^C 


ni P7^7 


noopoo 








cOT' 1 


wcDOOv 


niP7^7 

VIC' J ' 


VA/V*f W 


1 7P344 




nw V 


#400 K IPARP 




l/cDOOO 


01 P7^7 








MOV 


#600 It I PAR ^ 






01 P737 


1 77600 






nw V 


#177600 ICIPAR7 

mitt W V V # ^ 1 » t 




026702 


\J\J J\J\J~J 








CLR 


R3 






\J \ C f 


000004 






MOV 


#4.R4 




Ucwf 1 v 




0P70P4 






MOV 


*PATRNS.R5 








0P6740 


001 no 




MOV 


#6$,$LPERR 














INC 


R3 


2699 


026724 


012537 
012500 


172350 






MOV 


(R5)*.KIPAR4 


2700 


026730 








MOV 


(R5)*,R0 


2701 


026732 


013537 


001176 






MOV 


a<R5)*,$TMP0 


2702 


026736 


012501 








MOV 


(R5H,R1 


2703 


026740 


052737 


000400 


\77'i72 


6$: 


BIS 


«BIT6,MMR0 


2704 


026746 


010110 








MOV 


R1,(R0) 


2705 


026750 


017502 


177774 






MOV 


a-4(R5).R2 


2706 


026754 


005037 


177572 






CLR 


MMRO 


2707 


026760 


020102 








CMP 


R1,R2 


2708 


026762 


001401 








BEQ 


7$ 


2709 


026764 


104017 








ERROR 


+ 17 


2710 


026766 


013775 


001176 




7$: 


MOV 


lTMP0.a-4(R5) 


2711 


026774 


020304 








CMP 


R3,fi4 


2712 


026776 
G27000 


001351 








BNE 


51 


2713 


022704 


000020 






CMP 


#20. R4 


<;/ 14 


027004 


001507 








BEQ 


APTTST 


2715 


027006 


023727 


003022 


001000 




CMP 


$LST8K.#1000 


2716 


027014 


003503 








BLE 


APTTST 


2717 


027016 


012704 


000020 






MOV 


#20. R4 



S8TTL TEST # 46 - 18-eiT MAPPING ADDER TES^ 
iTEST 46 

• THIS TEST USES 'DESTINATION ONLY' RELOCATION TO CHECK THE 

• FULL ADD PROPERTIES OF THE RELOCATION ADDER. TWELVE PAIRS 

• OF NlfCERS ARE ADDED. GENERTING PHYSICAL ADDRESSES FROM 12K 
TO ABOVE 16K. 

• NOTE - PART OF THIS TEST WILL NOT BE RUN IF THERE IS LESS 

• THAN 16K OF MEMORY ON THE SYSTEM. 



THE PAR'S AND PDR'S SO THAT 



PUT ADDRESS OF 1ST OF 100 PR'S TO CLEAR TO RS 

CLEAR 100 LOCATIONS 

CLEAR THE LOCATION 

SUBTRACT 1 AND BRANCH IF NOT ZERO 

PUT ADDRESS OF REMAINING 40 PR'S TO CLEAR TO R5 

CLEAR 40 LOCATIONS 

CLEAR THE LOCATION 

SUBTRACT 1 AND BRANCH IF NOT ZERO 

SET COUNTER TO LOAD 8 ADDRESSES 

PUT ADDRESS OF FIRST PDR IN RI 

LOAD 77406 INTO PDR ADDRESSED BY RI 

BRANCH BACK TO 4S IF R2 IS NOT ZERO 

MAP PAGE 1 TO 4K->8K (PAGE 0 IS ALREADY MAPPED TO 0->4(() 
MAP PAGE 2 TO 8K->12K 
MAP PAGE 3 TO 12K->16K 
MAP PAGE 7 TO I/O PAGE 

CLEAR R3, THE POINTER USED TO INDEX TO THE TABLE 
EXECUTE ROUTINE UNTIL R3=4 

MOVE ADDRESS OF THE PATTERN SET (ON NEXT PAGE) TO R5 
SET LOOP ON ERROR POINTER TO 41 
INCREMENT THE TABLE POINTER 

LOAD PAR4 WITH VALUE IN TABLE. IDENTIFIED BY R3 VALUE 

PUT VIRTUAL ADDRESS IN RO 

SAVE DATA AT TEST LOCATION 

PUT DATA PATTERN INTO RI 

TURN ON DESTINATION ONLY RELOCATION 

TRY TO LOAD DATA PATTERN INTO LOCATION IN TABLE 

READ LOCATION INTO R2 

CLEAR WRO 

SEE IF DATA MATCHES PATTERN 
BRANCH IF DATA MATCHES 
RELOCATION FAILED 

RESTORE ORIGINAL DATA TO TEST LOCATION 
SEE IF WE ARE AT END OF THIS SET 
BRANCH BACK IF NOT 
SEE IF 2ND BATCH OF DATA IS NOW DONE 
BRANCH IF SO 

DO WE HAVE OVER 16K ON THIS SYSTEM? 
BRANCH IF WE DO NOT 
EXECUTE ROUTINE UNTIL R3=20 
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?718 027022 000737 BR 5S ;G0 BACK TO THE ROUTINE 



CKKTA80 11/44 MEW MGMT PRT A MACRO Mill 3 
TEST # A6 - 18-eiT MAPPING ADDER TEST 



23-APR-81 13:32 



L 7 
PAGE 75 



SEQUENCE 89 



2719 

2^20 

2721 

1722 

2721 

272^, 

2725 

2726 

2727 

272B 

2729 

2730 

2731 

2732 

2733 

273A 

2735 

2736 

2737 

2738 

2739 

27A0 

2741 

27A2 

27A3 

27AA 

27A5 

27A6 

27A7 

27A8 

27A9 

2750 

2751 

2752 

2753 



02702A 
027034 
02 704 A 
027054 
027064 
027074 
027104 
027114 
027124 
027154 
027144 
027154 
027164 
0271 74 
027204 
027214 



027224 
027230 
027234 
027236 
027244 
027246 
027254 
027260 
027262 
027266 
027270 
027272 



000600 
000625 
000633 
000604 
001000 
001252 
001125 
001010 
001314 
001104 
001356 
001242 
001377 
001221 
001377 
001370 



100000 
105276 
105500 
111476 
100000 
112576 
105276 
101000 
110400 
111400 
104200 
115600 
102100 
117700 
100100 
101000 



060000 
067776 
071000 
072076 
100000 
137776 
117776 
102000 
142000 
122000 
142000 
142000 
142000 
142000 
140000 
140000 



PATRNS: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



0600 J 
0625.1 
0633.1 
0604.1 
1000.1 
1252.1 
1125.1 
1010.1 
1314.1 
1104.1 
1356.1 
1242.1 
1377.1 
1221.1 
1377.1 
1370.1 



00000. 
05276. 
05500. 
11476. 
00000. 
12576, 
05276. 
01000. 
10400. 
11400. 
04200, 
15600. 
02100. 
17700. 
00100. 
01000. 



060000. 
067776. 
071000. 
072076. 
100000. 
137776. 
117776. 
102000. 
142000, 
122000. 
142000, 
142000. 
142000. 
142000, 
140000, 
140000. 



125200 

125201 

125202 

125203 

125204 

125205 

125206 

125207 

125210 

125211 

125212 

125213 

125214 

125215 

125216 

125217 



R3=1 DATA 
R3=2 DATA 
R3=3 DATA 
R3=4 DATA 
R3-5 DATA 
R3=6 DATA 
R3=7 3aTA 
R3=1CrDATA 
R3=11 DATA 
R3=12 DATA 
R3=13 DATA 
R3=14 DATA 
R3=15 DATA 
R3=16 DATA 
R3=17 DATA 
R3=20 DATA 



• THIS PIECE OF CODE CHECKS TO SEE IF THE PROGRAM IS RUNNING UNDER 

• APT. AND THEN LOOKS FOR THE APT SPECIAL ADDRESSING HARDWARE . IF 

• THE HARDWARE IS FOUND, THE NEXT TWO TESTS OPERATE AS IF THERE 

• WERE A FULL COMPLEMENT OF MEMORY ON THE SYSTEM. 
***************************************************************** 



005037 


001340 




APTTST: 


CLR 


HDWFLAG 


■RESET THE HARDWARE PRESENT FLAG 


105737 


001244 






TST8 


SENV 


•ARE WE UNDER APT? 


001420 








BEQ 


TST47 


•.•BRANCH TO NEXT TEST IF NOT 


032737 


000200 


001250 




BIT 


*8IT7.$USWR 


•IS THE HARDyARE SUPPOSED TO faE THERE ^ 


001414 






BEQ 


TST47 


;, -BRANCH TO NEXT TEST IF FALSE 


012737 


027262 


000004 




MOV 


#1$.ERRVEC 


•TRAPS TO 4 GO TO 1$ 


005737 


177770 






TST 


RMIREG 


; SPECIAL HARDWARE PRESENT? 


000404 








BR 


2S 


;IF WE GOT HERE. THE HARDWARE IS THERE 


062706 


000004 




1$: 


ADD 


#4.SP 


; CLEAN UP STACK AFTER INTERRUPT 


104060 








ERROR 


*60 


;APT SPECIAL HARDWARE NOT FOUND 


000402 








BR 


TST47 


;;G0 TO NEXT TEST 


005237 


001340 




2$: 


INC 


HDWFLAG 


;SET SPECIAL HARDWARE PRESENT FLAG 
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2768 .S8TTL TFST # 47 - 18-eiT MAPPING CAPRY PROPAGATION 

, ;iTEST 47 18-BlT HAPPING CARRY PROPAGATION 

THIS TEST USES FULL 18-eiT RELOCATION TO CHECK THE CARRY 
;* PROPAGATION OF THE RELOCATION ADDER. SINCE THIS TEST SCANS 

;* HEMORY FROM 00100000 TO 00740000 ON 8K BOUNDARIES. IT WILL 

REPORT ANY HOLES THAT IT FINDS IN HEHORY UP TO THE LAST 
BLOCK. THE INFORHATION GIVEN WILL BE THE ADDRESS WHERE 
THE HOLE WAS DISCOVERED AND THE FIRST GOOD ADDRESS AFTER 
;• THE HOLE. 

NOTE - PART OF THIS TEST WILL NOT BE RUN IF THE SYSTEH 
HEMORY SIZE IS LESS THAN 16K WORDS. 





027276 


000004 






, TST47: 


SCOPE 






2769 


027300 


012700 


100100 






MOV 


#1 ooioo.ro 


LOAD VIRTUAL ADDR FOR PAR4 INTO RO 


2770 


027304 


012737 


000001 


] 77572 




MOV 


»^ .MMRO 


-TURN ON 18-eiT MAPPING 


2771 


027312 


005737 


001340 






TST 


HDWFLAG 


-SPECIAL HARDWARE? 


2772 


027316 


001004 








BNE 


20$ 


-BRANCH IF TRUE 


2771 


027320 


025727 


003022 


001000 




CMP 


SLSTBK.iTlOOO 


-IS THERE AT LEAST 16K ON THE SYSTEM? 


277i» 


027326 


002510 








BLT 


4$ 


BRANCH IF LESS THAN 16K TO 4$ 


2775 


027330 


005037 


001336 




20$; 


CLR 


HOLFLG 


-MAKE SUIE HOLE FLAG STARTS AT ZERO 


2776 


027334 


012737 


027772 


000004 




MOV 


#10$,ERRVEC 


■SET ERROR VECTOR POINTER TO 10$ 


2777 


027y,2 


012737 


000777 


172350 




MOV 


M777,K1PAR(» 


-LOAD PAR4 WITH STARTING BASE 


277B 


027350 


012737 


001000 


1 72352 




MOV 


/ri000.KIPAR5 


-START ADDRESSING WITH 16K 


2779 


027356 


012701 


120000 






MOV 


#120000.R1 


-LOAD VIRTUAL ADDR FOR PAR5 INTO R1 


2780 


027362 


012702 


000375 






MOV 


#375. R2 


-LOAD DATA PATTERN INTO R2 


2781 


027366 


012737 


027374 


001110 




MOV 


#1$.$LPERR 


;SET LOOP ON ERROR POINTER TO 1$ 


2782 


027374 


005037 


001332 




1$: 


CLR 


PCPUER 


; CLEAR CPU ERROR FLAG 


2783 


027400 


005737 


001340 






TST 


HDWFLAG 


•SPECIAL HARDWARE? 


2784 


027404 


001404 








BEG 


2$ 


•BRANCH IF FALSE 


2785 


027406 


023737 


172352 


003022 




CMP 


KIPAR5,$LSTBK 


;ARE WE OUT OF EXISTING MEMORY? 


2786 


027414 


003023 








BGT 


21$ 


iBRANCH IF TRUE 


2787 


027416 


011137 


001176 




2$: 


MOV 


(R1),STMP0 


•SAVE DATA AT TEST LOCATION 


2788 


027U22 


005737 


001332 






TST 


PCPUER 


-SEE IF THERE WAS A CPU TRAP 


2789 


027426 


001014 








BNE 


3$ 


■BRANCH IF TRAP OCCURRED 


2790 


027430 


005737 


001336 






TST 


HOLFLG 


•SEE IF HOLE WAS FOUND IN MEMORY 


2791 


027klA 


001411 








BEO 


3$ 


•BRANCH IF NO HOLE WAS FOUND 


2792 


027^,36 


013737 


172352 


001202 




MOV 


KIPAR5.$THP2 


;SAVE PAR THAT POINTS TO END OF HOLE 


2793 


027444 


012737 


027330 


001110 




HOV 


#20$,$LPERR 


■SET LOOP ON ERROR POINTER TO 20$ 


2794 


027452 


104041 








ERROR 


♦41 


•HOLE IN MEMORY FROM $TMP1 TO $TMP2 


2795 


027454 


005037 


001336 






CLR 


HOLFLG 


•CLEAR HOLE FLAG IN CASE THERE ARE MORE 


2796 


027460 


010210 






3$: 


MOV 


R2. (RO) 


•LOAD TEST PATTERN INTO TEST LOCATION 


2797 


027462 


000405 








BR 


23$ 


■BRANCH OVER NEXT INSTRUCTIONS 


2798 


027464 


010204 






21$: 


MOV 


R2.R4 


■GET COPY OF DATA 


2799 


027466 


052704 


000400 






BIS 


*BIT8.R4 


■ADD SPECIAL HARDWARE ENABLE BIT 


2800 


027^,72 


010437 


y77770 






MOV 


R4.RMIREG 


;PUT DATA IN SPECIAL HARDWARE 


2801 


027476 


011103 






23$: 


MOV 


(R1).R3 


;READ TEST LOCATION VIA DIFFERENT VIRT. ADDR. 


2802 


027500 


020203 








CMP 


R2.R3 


•SEE IF THE CORRECT LOCATION WAS REFERENCED 


2803 


027502 


001401 








BEO 


22i 


■BRANCH IF CORRECT DATA WAS OBTAINED 


2804 


027504 


104042 








ERROR 


♦42 


■BAD RELOCATION 


2805 


027506 




001 1 76 




22$: 


MOV 


$TMPO. (R1 ) 


•RESTORE ORIGINAL DATA TO TEST LOCATION 


2806 


027512 


00*^737 


000400 


172350 




ADD 


#400.KIPAR4 


-CHANGE BASE ADDRESS 


2807 


027520 


062737 


000400 


172352 




ADD 


#400.KIPAR5 


•CHANGE BASE ADDRESS 


2808 


027526 


005302 








DEC 


R2 


•CHANGE DATA PATTERN 
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2809 


027530 


022717 


007400 


172352 


2810 


027536 


103316 






2811 


027540 


005737 


001336 




2812 


027544 


001401 






2813 


027546 


104043 






2814 










2815 










2816 










2817 










2818 










2819 










2820 










2821 










2822 










2823 










2824 


027550 


005737 


001340 




2825 


027554 


001402 






2826 


027556 


005037 


^77770 




2827 


027562 


012737 


003232 


000004 


2828 


027570 


012737 


027622 


001110 


2829 


027576 


012737 


007577 


172350 


2830 


027604 


012702 


007600 




2831 


027610 


012737 


000020 


001334 


2832 


027616 


005037 


001332 




2833 


027622 


010210 






283A 










2835 










2836 


027624 


005737 


001332 




2837 


027630 


001001 






2838 


027632 


104044 






2839 










2840 










2841 










2842 










2843 










2844 










2845 


027634 


012737 


027660 


001110 


2846 


027642 


005037 


001334 




2847 


027646 


012737 


007777 


172350 


2848 


027654 


005037 


000000 




2849 


027660 


013701 


100100 




2850 


027664 


005701 






2851 


027666 


001401 






2852 


027670 


104045 






2853 


027672 


012737 


027736 


oonio 


2854 


027700 


022737 


007377 


003022 


2855 


027706 


101423 






2856 


027710 


012737 


000040 


001334 


2857 


027716 


005037 


001332 




2858 


027722 


013737 


003022 


172350 


2859 


027730 


062737 


000100 


1 72350 


2860 


027736 


013701 


100100 




2861 


027742 


005737 


001332 




2862 


027746 


001003 






2863 


027750 


012700 


100100 




2864 


027754 


104046 






2865 


027756 


005037 


001334 





45$: 



40$: 



16$: 



17$: 



8$: 



N 7 
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• SEQUENCE 



CMP #7400AIPAR5 

BHIS 1$ 

TST HOLFLG 

BEO 4$ 

ERROR +43 



SEE IF PAST LAST ADDRESS 
BRANCH IF NOT PAST LAS^ ADDRESS 
SEE IF YOU ARE IN MIDDLE OF HOLE 
BRANCH IF NOT IN MIDDLE OF HOLE 
IN MIDDLE OF HaE IN MEMORY 
HOLFLG HAS NUMBER OF TIMEOUTS 
$TMP1 HAS PAR OF FIRST TIMEOUT 



ADDRESS 760000 IS GENERATED BY CARRY PROPAGATION WHILE THE 
PROGRAM IS EXPECTING A TIME OUT. (760000 IS THE FIRST I/O 
PAGE ADDRESS). KIPAR4 WILL CONTAIN 007577 AND RO HAS 100100 
(WHICH SELECTS KIPAR4 AND GENERATES ADDRESS 760000). IF THE 
WRONG BIT IN THE CPU ERROR REGISTER IS SET, OR IF NO TRAP 
TO 'ERRVEC OCCURS AN ERROR IS REPORTED. 



TST HDWFLAG 

BEO 45$ 

CLR RMIREG 

MOV #TIMERR. ERRVEC 

MOV #40$.$LPERR 

MOV #7577,KIPAR4 

MOV #7600. R2 

MOV #20.CPUEXP 

CLR PCPUER 

MOV R2.(R0) 



TST PCPUER 
BNE 6$ 
ERROR +44 



SPECIAL HARDWARE? 
BRANCH IF NOT 

MAKE SURE SPECIAL HARDWAE IS OFF 

RESTORE NORMAL ROUTINE FOR TRAPS THRU 4 

SET LOOP ON ERROR POINTER TO 40$ 

LOAD KIPAR4 WITH 007577 

LOAD DATA PATTERN INTO R2 

EXPECTING UNIBUS TIMEOUT 

CLEAR CPU TRAP FLAG 

LOAD 760000 THRU PAGE 4 

THIS INSTRUCTION SHOULD TIMEOUT 

OVER THE UNIBUS. 

SEE IF TRAP OCCURRED 

BRANCH IF TRAP 

NO CPU TRAP 



ADDRESS 000000 IS GENERATED BY CARRY PROPAGATION. THEN, IF 
THERE IS LESS THAN 120K OF MEMORY ON THE SYSTEM. THE LAST 
BLOCK ($LST8K) IS USED AS A PAR AND A CARRY IS PROPAGATED TO 
CAUSE AN 18-eiT OVERFLOW. 



MOV #16$.$LPERR 

CLR CPUEXP 

MOV #7777,KIPAR4 

CLR 0 

MOV 1001 00. Rl 

TST Rl 

BEO 7$ 

ERROR +45 

MOV #1 7$,$LPERR 

CMP #7377. $LSTBK . 

BLOS 8$ 

MOV #40. CPUEXP 

CLR PCPUER 

MOV $LST8K.KIPAR4 

ADD #100.KIPAR4 

MOV 1001 00, Rl 

TST PCPUER 

BNE 8$ 

MOV #1001 00. RO 

ERROR ^46 

CLR CPUEXP 



SET LOOP ON ERROR POINTER TO 16$ 
NO TRAPS THRU ERRVEC EXPECTED HERE 
LOAD PARA WITH HIGHEST VALUE POSSIBLE 
CLEAR ADDRESS ZERO 

THIS SHOULD READ ADDRESS ZERO INTO Rl 

SEE IF YOU READ ADDRESS ZERO 

BRANCH IF ADDRESS ZERO WAS READ 

DIDN'T READ ADDRESS ZERO 

SET LOOP ON ERROR POINTER TO 17$ 

IS MEMORY BLOCK SIZE < 7377 

BRANCH IF MORE THAT 120K ON SYSTEM 

EXPECTING NON-EXISTANT MEMORY ERROR 

CLEAR TRAP THRU ERRVEC FLAG 

GET READY TO GENERATE NO^HEXISTANT ADDR. 

MAKE SURE WE'RE IN NON-EXISTANT MEMORY. 

READ FROM NON-EXISTANT ADDRESS 

SEE IF TRAP THRU ERRVEC OCCURRED 

BRANCH TO EXIT IF TRAP OCCURED 

SAVE VIRTUAL ADDRESS FOR ERROR TYPEOUT 

NO TRAP THRU ERRVEC 

NO CPU TRAPS EXPECTED 
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PAGE 



B 8 

76-2 



SEQUENCE 92 



2866 

2867 

2868 

2869 

2870 

2871 

2872 

2873 

2874 

2875 

2876 

2877 

2878 

2879 

2880 

2881 

2882 

2883 

2884 

2885 

2886 

2887 

2808 

2889 

2890 

2891 

2892 

2893 

2894 



027762 
027770 

027772 
027776 
030002 
030010 
030016 
030020 
050026 
030030 
030036 
030040 
030042 
030044 
030052 
030054 
030060 
030062 
030070 
030074 
030076 
030104 
030106 
030114 
030120 
030124 
030130 
030134 



012737 
000462 

012637 
012637 
013737 
022737 
001012 
023737 
002404 
012737 
000430 
104047 
000426 
022717 
001011 
005737 
001003 
013737 
005237 
000411 
013737 
104001 
013737 
005037 
005037 
013746 
013746 
000002 



027330 


001 110 




WUV 


J^70C Cl DCOO 








tJH 


1 O 1 Pw . 


• QDAkiru Tn kiCVT TCCT 










TOAD TO UFOF TUDI 1 1 




OUT Jc6 




lO*: 


nuv 


f ^cdS ^ m nor 


CAWF DFTinu AnnMTCC 


001330 






^JV 




CAl/F DFTlBM PCU 

j^»c wc 1 unn row 


\ f f fOO 


00 1 jjc 






roiiCDO Dm CO 




WW*\J 


OO 1 jjc 






MLCi DTPIIFO 


UAC TOAP MnM->FVf CTAMT MFMnfiV 












1 7DT^A 
I f CJJ\J 


\AJj\JCC 








CFF TF PAQA MATrUFC 1 ACT lU nrr IM MFMOBV 








Ql T 


1 1 C 


ODAiuru IF km mattu— Foono lu tdmpaof riBriiiTC 


A57CCn 


OUT JcO 




nuv 


jrAC ni nor 


rUAktfZF OFTIBM AnnOFCC TF AT TOP OF MFMPPV 






BO 
OK 




bBAAirU Tn FVIT 












POFMATIDF FMh OF MFMf^V FrMMT) 








on 


1 Li, 


■ARAMrH TO FX IT 




\AJ 1 jjc 


1 7« • 




jr?n DrPiiFD 


•CFF TF AnnOFCC TTMFD ml 








QnIC 


1 j9 a 


■RRAMrw IF MD T IMF HIIT IMFVPFrTFD FRRDO 








1 0 1 




■MAC THIS HAPPFNFD RFFQRF'' 










15S 


■RRANFH IF MOT FIRCT TIMFQUT 


1 ' CJJC 


(VII ?ftO 




nuv 




•CAVF PAR UHFRF Mm F F IRCT DKmvFRFD 






1 St 


IMP 


HUL» Lw 


■ItFFP rniMT OF CIICrFCCTVF TIMFniTC 












•RRAMrM tn FKIT 


UU 1 JCO 


WW 1 JCH 


1 ^4 • 

1 J9 . 


MOW 


ULWr Ir #OWWr V, 


•MnvF pr nF iff^xPFrtFD frror for tvpfoiit 








ERROR 


♦ 1 


-UNEXPECTED TRAP THROOgh ERRV^C 


001106 


001326 




MOV 


$LPADR,0LDPC 


;RETURN to BEGi^MiNG OF TEST 


001336 






CLR 


HOLFLG 


.CLEAR FLAG IN CASE IT UAS SET 


177766 




14$: 


CLR 


CPUERR 


.CLEAR CPU ERROR REGISTER 


001330 






«0V 


OLDPS.-(KSP) 


.PUSH OLD PSW ONTO STACK 


001326 






«0V 


OLDPC.-(KSP) 


;PUSH RETURN ADDRESS ONTO STACK 








RTI 




.RETURN TO TEST AND CONTINUE 
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SEQUENCE 



2908 



S8TTL TEST » 50 - 22-61 T MAPPING CARRY PROPAGATION 
'test 50 22-eiT MAPPING CARRY PROPAGATION 







000004 






7ST50: 


SCOPE 


#1 ooioo.ro 






012700 

VIC* W 


100100 






nov 




050144 


012701 


1 20000 






nov 


#1 20000. R1 




0501 50 


012737 

vie* -J ' 


000020 


172516 




MOV 


/IIBIT4.MMR3 


?91? 


0501 56 


005737 


001340 






TST 


HDWFLAG 


2913 


030162 


001004 








BNE 


20$ 


29K 


030164 


022737 


007377 


003022 




CMP 


#7377.$LSTBK 


2915 


0301 72 


003112 








BGT 


4$ 


2916 


030174 


012737 


030654 


000004 


20$: 


MOV 


4riO$.ERRVEC 


2917 


030202 


005037 


001336 






CLR 


H0LFL6 


2918 


030206 


012737 


007377 


1 72350 




MOV 


#7377.KIPAR4 


2919 


030214 


012737 


007400 


1 72352 




MOV 


*7400.KIPAR5 


2920 


030222 


012702 


000360 






MOV 


#360, R2 


2921 


030226 


012737 


030234 


001110 


1$: 


MOV 


'V21$.$LPERR 


2922 


030234 


005737 


001340 




21$: 


TST 


HDWFLAG 


2923 


030240 


001404 








BEQ 


22$ 


2924 


030242 


023737 


1 72352 


003022 




CMP 


KIPAR5.$LSTBK 


2925 


030250 


003025 








BGT 


23$ 


2926 


030252 


005037 


001332 




22$: 


CLR 


PCPUER 


2927 


030256 


011137 


001 1 76 






MOV 


(R1),$TMP0 


2928 


030262 


005737 


001332 






TST 


PCPUER 


2929 


030266 


001014 








BNE 


2$ 


2930 


030270 


005737 


001336 






TST 


HOLFLG 


2931 


030274 


001411 








BEQ 


2$ 


2932 


030276 


013737 


172352 


001202 




MOV 


KIPAR5.$TMP2 


2933 


030304 


012737 


030174 


001110 




MOV 


#20$.$LPERR 


2934 


030312 


104050 








ERROR 


♦50 


2935 


030314 


005037 


001336 






CLR 


HOLFLG 


2936 


030320 


010210 






2$: 


MOV 


R2,(R0) 
24i 


2937 


030322 


000405 








BR 


2938 


030324 


010204 






23$: 


nov 


R2,R4 


2939 


030326 


052704 


000400 






BIS 


«BIT8,R4 


2940 


030332 


010437 


177770 






MOV 


R4,RMIREG 


2941 


030336 


011103 






24$: 


MOV 


(R1).R3 


2942 


030340 


020203 








CMP 


R2.R3 


2943 


030342 


001401 








BEQ 


3$ 


2944 


030344 


104051 








ERROR 


♦51 


2945 


030346 


013711 


001176 




3$: 


MOV 


$TMP0.(R1) 


2946 


030352 


062737 


000400 


172350 




ADO 


#400,KIPAR4 


2947 


030360 


062737 


000400 


172352 




ADD 


#400, K I PARS 


2948 


030366 


005302 








DEC 


R2 


2949 


030370 


023737 


172350 


003022 




CMP 


KIPAR4.$LSTBK 



THIS TEST USES FULL 22-611 RELOCATION TO CHECK THE CARRY 
PROPAGATION THAT PERTAINS TO 22 BIT ADDRESSES. THIS TEST 
SCANS MEMORY FROM 00740000 TO 16740000 OR THE LAST BLDCK. 
ON 8K BOUNDARIES. IF ANY HOLES ARE FOUND. THE ADDRESS 
UHERE THE HOLE WAS DISCOVERED AND THE FIRST GOOD ADDRESS 
AFTER THE HOLE WILL BE REPORTED. 

NOTE - PART OF THIS TEST WILL NOT BE RUN IF THERE IS LESS 
THAN 120K ON THE SYSTEM. 



LOAD VIRTUAL ADDR FOR PAR4 INTO RO 
LOAD VIRTUAL ADDR FOR PARS INTO R1 
ENABLE 22 BIT MAPPING 
IS THERE SPECIAL HARDWARE? 
BRANCH IF THERE IS 

IS THERE AT LEAST 120K ON THE SYSTEM? 

BRANCH IF LESS THAN 120K 

SET ERROR VECTOR POINTER TO 10$ 

MAKE Slf»E HOLE FLAG STARTS AT ZERO 

LOAD PAR4 WITH STARTING BASE 

LOAD BASE ADDRESS +100 INTO KIPAR5 

LOAD DATA PATTERN INTO R2 

SET LOOP ON ERROR POINTER TO 21$ 

IS THERE SPECIAL HARDWARE? 

BRANCH IF NOT 

ARE WE OUT OF MEMORY SPACE? 

BRANCH IF WE ARE 

CLEAR CPU ERROR FLAG 

SAVE DATA AT TEST LOCATION 

SEE IF THERE WAS A CPU TRAP 

BRANCH IF TRAP OCCURRED 

SEE IF HOLE WAS FOUND IN MEMORY 

BRANCH IF NO HOLE WAS FOUND 

SAVE PAR THAT POINTS TO END OF HOLE 

SET LOOP ON ERROR POINTER TO 20$ 

HOLE IN MEMORY FROM $TMP1 TO $TMP2 

CLEAR HOLE FLAG IN CASE THERE ARE MORE 

LOAD TEST PATTERN INTO TEST LOCATION 

BRANCH OVER NEXT FEW INSTRUCTIONS 

GET CURRENT DATA VALUE 

SET SPECIAL HARDWARE ENABLE BIT 

SETUP SPECIAL HARDWARE 

READ TEST LOCATION VIA DIFFERENT VIRT. ADDR. 

SEE IF THE CORRECT LOCATION WAS REFERENCED 

BRANCH IF CORRECT DATA WAS OBTAINED 

BAD RELOCATION 22-BIT MAPPING 

RESTORE ORIGINAL DATA TO TEST LOCATION 

CHANGE BASE ADDRESS 

CHANGE BASE ADDRESS 

CHANGE DATA PATTERN 

IS THE PAR ABOVE THE LAST BLOCK OF MEMORY 
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2950 


030376 


003010 






2951 


030400 


Q22717 


167400 


172352 


2952 


030406 


103307 








030410 


005737 


001336 




2954 


030414 


001401 






2955 


030416 


104052 






2956 










2957 










2958 










2959 










2960 
2961 


030420 


012737 


000020 


172516 


2962 


030426 


012737 


003232 


000004 


2963 


030434 


012737 


167777 


172350 


2964 


030442 


012737 


000000 


172352 


2965 


030450 


012702 


017000 




2966 


030454 


012737 


030474 


001110 


2967 


030462 


012737 


000020 


001334 


2968 


030470 


011037 


001176 




2969 


030474 


010210 






2970 


030476 


011103 






2971 


030500 


013710 


001176 




2972 


030504 


020203 






2973 


030506 


001401 






2974 


030510 


104053 






2975 










2976 










2977 










2978 










2979 










2980 










2981 


030512 


012737 


030536 


001110 


2982 


030520 


005037 


001334 




2983 


030524 


012737 


1 77777 


172350 


2984 


030532 


005037 


^ A ^ AAA 

000000 




2985 


030536 


013701 


A MAM AM 

100100 




2986 


030542 


005701 






2987 


030544 


001401 






2988 


030546 


104045 






2989 


030550 


012737 


030614 


001110 


2990 


030556 


022737 


^67777 


003022 


2991 


030564 


101423 






2992 


030566 


012737 


MAMA 1 A 

000040 


001334 


2993 


030574 


005037 


001332 




2994 


030600 


013737 


003022 


1 72350 


2995 


030606 


062737 


000100 


172350 


2996 


030614 


013701 


100100 




2997 


030620 


005737 


001332 




2998 


030624 


001003 






2999 


030626 


012700 


100100 




3000 


030632 


1 f\j f\j ^ 
104046 






3001 


030634 


005037 


001334 




3002 


030640 


012737 


030174 


001110 


3003 


030646 


005037 


172516 




3004 


030652 


000462 






3005 










3006 


030654 


012637 


001326 





16$: 



7$: 



17$: 



8$: 



10$: 



D 8 
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SEQUENCE 



BGT 4$ .-BRANCH IF ABOVE LAST MEM. LOC. 

CMP #1 67400. K I PARS .-MAKE SURE YOU DON'T GO ON THE UNI8US 

BHIS 1$ .BRANCH IF NOT PAST LAST ADDRESS 

TST H0LFL6 .SEE IF MEMORY ENDS WITH A HOLE 

BEG 4$ .BRANCH IF NO HOLE AT END OF MEMORY 

ERROR +52 .'HOLE AT END OF MEMORY 

UNI8US ADDRESS 000000 IS GENERATED BY CARRY PROPAGATION 

SINCE THE MAP IS DISABLED. THIS SHOULD REFERENCE PHYSICAL 
ADDRESS 000000. 

MOV *eiT4.MMR3 .-ENABLE 22-61 T MAPPING 

MOV #TIMERR.ERRVEC .-RESTORE NORMAL ROUTINE FOR TRAPS THRU 4 

MOV #167777,KIPAR4 ;GET READY TO TEST U.S. ADDRESS 0 

MOV #000000. K I PARS .-SHOULD GO TO PHYSICAL ADDRESS 0 

MOV #17000.R2 .-LOAD DATA PATTERN INTO R2 

MOV #5$.$LPERR .-SET LOOP ON ERROR POINTER TO 5$ 

MOV /r20.CPUEXP .-EXPECTING UNI8US TIMEOUT 

MOV (RO).$TMPO .-SAVE DATA IN LOCATION 0 USIf^G PAGE 4 

MOV R2.(R0) .-LOAD DATA PATTERN INTO TEST LOCATION 

MOV (R1).R3 .-READ TEST LOCATION VIA DIFFERENT VIRT ADDR 

MOV $TMPO,(RO) .-RESTORE ORIGINAL DATA USING PAGE 4 

CMP R2,R3 .-SEE IF DATA MATCHES 

BEO 6S .-BRANCH IF TRAP 

ERROR ^53 .-BAD RELOCATION.UNISUS ADDRESS 

ADDRESS 000000 IS GENERATED BY CARRY PROPAGATION. THEN. IF 

THERE IS LESS THAN 120K OF MEMORY ON THE SYSTEM, THE LAST 

BLOCK ($LSTBK) IS USED AS A PAR AND A CARRY IS PROPAGATED TO 

CAUSE A 22-81 T OVERFLOW. 

MOV #16S.$LPERR ;SET LOOP ON ERROR POINTER TO 16$ 

CLR CPUEXP .-NO TRAPS THRU ERRVEC EXPECTED HERE 

MOV #1 77777. K I PAR4 ;LOAD PAR4 WITH HIGHEST VALUE POSSIBLE 

CLR 0 .-CLEAR ADDRESS ZERO 

MOV 100100. R1 .-THIS SHOULD READ ADDRESS ZERO INTO R1 

TST R1 .-SEE IF YOU READ ADDRESS ZERO 

BEO 7$ .-BRANCH IF ADDRESS ZERO WAS READ 

ERROR +45 .-niDN'T READ ADDRESS ZERO 

MOV #17$.$LPERR ;SET LOOP ON ERROR POINTER TO 17$ 

CMP #1 67777. $LSrBK ;IS MEMORY BLOCK SIZE < 167777 

BLOS 8$ .-BRANCH IF MORE THAT 120K ON SYSTEM 

MOV #40. CPUEXP .-EXPECTING NON-EXISTANT MEMORY ERROR 

CLR PCPUER .-CLEAR TRAP THRU ERRVEC FLAG 

MOV $LST8K.KlPAft4 ;GET READY TO GENERATE NON-EXISTANT ADDR. 

ADD #100-KIPAR4 ;MAKE SURE WE ARE IN NOW-EXISTANT MEMORY 

MOV 100100. R1 .READ FROM NON-EXISTANT ADDRESS 

TST PCPUER .SEE IF TRAP THRU ERRVEC OCCURRED 

BNE 8$ .BRANCH TO EXIT IF TRAP OCCURED 

MOV #100100. RO .SAVE VIRTUAL ADDRESS FOR ERROR TYPEOUT 

ERROR +46 ;N0 TRAP THRU ERRVEC 

CLR CPUEXP ;N0 CPU TRAPS EXPECTED 

MOV #20$.$LPERR .SET LOOP ON ERROR POINTER TO START OF TEST 

CLR MMR3 .-RETURN TO IB-BIT MAPPING 

BR TST51 .-.-BRANCH TO NEXT TEST 

TRAP TO HERE THRU ERRVEC ••••••••••••••»•• 

MOV (KSP)*.OLDPC .-SAVE RETURN ADDRESS 



CKKTABO MEM MGHT PRT A MACRO Ml 11 3 23-APR-81 

TEST # 50 - ??-e]T MAPPING CARRY PROPAGATION 

3007 030660 012637 001330 MOV 

3008 03066A 013737 177766 001332 MOV 

3009 030672 022737 000040 001332 CMP 

3010 030700 001012 BN£ 

3011 030702 023737 172350 003022 CMP 

3012 030710 002404 BLT 

3013 030712 012737 030420 001326 MOV 

3014 030720 000430 BR 

301 5 030722 104047 IIS: ERROR 

3016 030724 000426 BR 

3017 030726 022737 000020 001332 12$: CMP 

3018 030734 001011 BNE 

3019 030736 005737 001336 TST 

3020 030742 001003 BNE 

3021 030744 013737 172352 001200 MOV 

3022 030752 005237 001336 15S: INC 

3023 030756 000411 BR 

3024 030760 013737 001326 001324 13$: MOV 

3025 030766 104001 ERROR 

3026 030770 013737 001106 001326 MOV 

3027 030776 005037 001336 CLR 

3028 031002 005037 177766 14$: CLR 

3029 031006 013746 001330 MOV 

3030 031012 013746 001326 MOV 

3031 031016 000002 RTI 



13.32 PAGE W 



SEQUENCE 



(KSP)*.0LDPS 


SAVE RETURN PSW 


CPUERR.PCPUER 


SAVE CPU ERROR REGISTER FOR TYPING 


*40,PCPUER 


UAS TRAP NON-EXISTANT MEMORY 


12$ 


BRANCH IF MEMORY EXISTS 


KIPAR4.$LST8K 


SEE IF PAR4 MATCHES LAST BLOCK IN MEMORY 


11$ 


\ ftfti/^ii ffp ft^\ MA ▼ ^ ■ 1 F nn/^n t ft ■ ^ ^^Mn /*tn^iiiTf 

BRANCH IF NO MATCH-ERROR IN COMPARE CIRCUITS 


#4$,0LDPC 


CHANGE RETURN ADDRESS IF AT TOP OF MEMORY 


14$ 


AftlAll PwtT 

BRANCH TO EXIT 


•♦•47 


PREMATURE END OF MEMORY FOUND 


14$ 


f%f\ Afti^li rwtT 

BRANCH TO EXIT 


#20.PCPUER 


'SEE IF ADDRESS TIMED OUT 


13$ 


■BRANCH IF NO TIME OUT, UNEXPECTED ERROR 


HOLFLG 


■HAS THIS HAPPENED BEFORE? 


15$ 


'BRANCH IF NOT FIRST TIMEOUT 


KjPAR5,$THP1 


tip n 1 iLjp Ap imi p pfBPT ^rp pniiC dp ^ 

'SAVE PAR WHERE HOLE FIRST DISCOVcRcD 


HOLFLG 


. i^p pn lAiT np pi ippppp t tiP t f MPnt it c. 

'KEEP COUNT OF SUCCESSIVE TIMEOUTS 


IAS 


.nnAAi^u Trt PWTT 

;BRANCH TO EXIT 


OLDPCBADPC 


;MOVE PC OF UNEXPECTED ERROR FOR TYPEOUT 






$LPADR.OLDPC 


.'RETURN TO BEGI^MING OF TEST 


HOLFLG 


; CLEAR FLAG IN CASE IT UAS SET 


CPUERR 


; CLEAR CPU ERROR REGISTER 


OLDPS.-(KSP) 


;PUSH OLD PSW ONTO STACK 


OLDPC.-(ICSP) 


;PUSH RETURN ADDRESS ONTO STACK 
.■RETURN TO TEST AND CONTINUE 



r 



CKH.TABO n/4A MEW MGMT PRT A MACRO Ml 113 23-APR-81 13:32 
TEST » 51 - »^EAD AND WRITE WHILE IN REl OCATE MODE 



F 8 
PAGE 78 



SEQUENCE 



5052 



S8TTL TEST # 51 - READ AND WRITE WHILE IN RELOCATE MODE 



•TEST 
* 

* 

» 
» 
» 

* 

* 
* 
* 
* 



51 



READ AND WRITE WHILE IN RELOCATE MODE 



THE FOLLOWING TEST TURNS ON MEMORY MANAGEMENT AND THEN 
READS AND WRITES LOCATIONS BETWEEN PHYSICAL ADDRESSES 
060000-067600. ONE LOCATION IN EVERY BLOCK (32. WORDS) 
IS WRITTEN USING PAR4 AND READ USING PARS. THIS IS 
DONE IN BOTH USER AND KERNEL MODES. THE 'WODE" INPUT TO 
THE PAR/PDR ADDRESS MUX IS CHECKED BY READING AND WRITING 
IN USER MODE. REMEMBER ALSO, THAT SINCE MEMORY MANAGEMENT 
IS ON (IN RELOCATE MODE) THE PROGRAM ITSELF IS USING ITS 
VIR'UAL ADDRESSES AND THE PAR/PDR 'S TO EXECUTE. 

WHILE TESTING IN KERNEL MODE. USER PAGES 4 fc 5 ARE MAPPED 
NON-RESIDENT WITH DIFFERENT PAR VALUES THAN THE KERNEL 
PAR'S TO BE SURE THAT THE KERNEL PAR'S AND PDR'S ARE BEING 
USED WHEN IN KERNEL MODE (AND VICE VERSA WHILE TESTING IN 
USER MODE). IF A MEM. MGMT. TRAP OCCURS, THE PROGRAM GOES 
TO 8$ WHERE THE TRAP IS REPORTED. 



03 1 U^U 








TCT^I . 

1 5 1 5 1 : 


SLOPt 




5053 {jjiUcc 




\ f f f fO 




1 1 : 


LLR 


roW 












Mm/ 

nOV 


^C77 DL 

If Of f .Hh 


yjjj OjIUjc 


\jicfVj 


UUUOUO 






MOV 




jUjo U3iUx> 


ni rw X7 


1 TiX^(\ 

1 f ciiKi 






MOV 








1 701^5 
1 ( CJJC 






nuv 




X>30 UjIU*»o 


\JlCf\JV 


1 Tft^LFi 

1 f f o*»u 






nuv 




3059 031052 


01 2703 


1 72240 






MOV 


#^IPARO R3 


3060 031056 


005001 








CLR 


R1 


3061 031060 


012702 


000007 






MOV 


»7,R2 


3062 031064 


010120 






2S: 


MOV 


R1,(R0)* 


3063 031066 


010123 








MOV 


R1.(R3)* 


3064 031070 


062701 


000200 






ADD 


#260,R1 


3065 031074 


077205 








soe 


R2.2$ 


3066 031076 


012710 


007600 






MOV 


#7600, (RO) 


3067 031102 


012713 


007600 






MOV 


#7600. (R3) 


3068 031106 


01270g 


177600 






MOV 


/ruiPDRO.RO 


3069 031112 


012703 


172200 






MOV 


#SIPDR0,R3 


3070 031116 


012701 


077406 






MOV 


#77406. Rl 


3071 031122 


01270? 


000010 






MOV 


#10.R2 


3072 031126 


01 01 20 






3$: 


MOV 


R1,(R0)* 


3073 031130 


010123 








MOV 


R1.(R3)* 


3074 031132 


077203 








soe 


R2.3$ 


3075 031134 


105037 


177610 






CLRB 


UIPDR4 


3076 031140 


105037 


177612 






CLR8 


UIPDR5 


3077 031144 


105037 


172210 






CLRB 


SIPDR4 


3078 031150 


105037 


172212 






CLRB 


SIPDR5 


3079 031154 


010537 


177650 






MOV 


R5,UIPAR4 


3080 031160 


010437 


177652 






MOV 


R4,UIPAR5 


3081 031164 


010537 


172250 






MOV 


R5.SIPAR4 


3082 031170 


010437 


m252 






MOV 


R4.SIPAR5 


3083 031174 


012737 


000001 


^ 77572 




MOV 


#1.SR0 


3084 031202 


012737 


031234 


001110 




MOV 


#5$.$LPERR 


3085 031210 


012737 


031556 


000250 




MOV 


#8S,MMVEC 


3086 031216 


013737 


177776 


001176 


4S: 


MOV 


PSW.STMPO 



START IN KERNEL MODE 
LOAD R4 WITH VALUE FOR PAR4 
LOAD RS WITH VALUE FOR PARS 
LOAD KERNEL PAR4 
LOAD KERNEL PARS 

LOAD ADDRESS OF FIRST USER PAR IN RO 

LOAD ADDRESS OF FIRST SUPERVISOR PAR IN R3 

CLEAR R1 

LOAD LOOP COUNTER WITH A 7 

MAP USER PAR'S TO PAGES 0-6 (4K EACH) 

MAP SUPERVISOR PAR'S TO PAGES 0-6 (4K EACH) 

LOOP l*JTIL UIPAR0HJIPAR6 ARE LOADED 
MAP USER PAR 7 TO THE I/O PAGE 
MAP SUPERVISOR PAR7 TO THE I/O PAGE 
LOAD ADDRESS OF FIRST USER PDR IN RC 
LOAD ADDRESS OF FIRST SUPERVISOR PDR IN R3 
LOAD PDR DATA INTO R1 
LOAD LOOP COUNTER WITH AN 8 
MAP ALL 8 PAGES 128 BLOCKS. UPWARD 
EXPANDABLE, READ/WRITE FOR 
USER AND SUPERVISOR MODES. 
MAP USER SPACE NON-RESIDENT WHILE 

TESTING KERNEL SPACE 
MAP SUPERVISOR SPACE NON-RESIDENT WHILE 

TESTING KERNEL SPACE 
MAP USER PAR'S OPPOSITE OF KIPAR'S 

;MAP SUPERVISOR PAR'S OPPOSITE OF KIPAR'S 

TURN ON MEMORY MANAGEMENT (RELOCATE MODE) 
SET LOOP ON ERROR POINTER TO 5$ 
SET M. M. TRAP VECTOR TO 8$ 
SAVE PSW IN CASE OF ERROR 



CKKTABO 11 /AA MEM MGMT PRT 
TEST * 51 - READ AND WRITE 



A HACRO Mil 13 
WHILE IN REIOCATE 



23-APR-81 
MODE 



3087 031224 


012700 


100100 






MOV 


5088 031230 


012701 


120000 






MOV 


3089 031 23A 


010010 






5$: 


MOV 


3090 031236 


011102 








MOV 


3091 031240 


020002 








CMP 


3092 031242 


001411 








BEQ 


3093 031244 


010137 


001300 






MOV 


3094 031250 


010037 


001276 






MOV 


3095 031254 


004737 


003426 






JSR 


^^^^^^ 4^ ^ A ^ 

3096 031260 


104020 








ERROR 


3097 












3093 












3099 












3100 












3101 












3102 031262 


013700 


001276 






MOV 


3103 031266 


062700 


y%y% A 4 

000100 




6$: 


ADD 


3104 031272 


062701 


000100 






ADD 


3105 031276 


020127 


1 27700 






CMP 


3106 031302 


001354 








BNE 


3107 031304 


032737 


140000 


< 9999V 

1 77776 




BJ T 


3108 031312 


001026 








BNE 


3109 031314 


010437 


1 77650 






MOV 


3110 031320 


010537 


4 99V r '\ 

1 77652 






MOV 


9 4 4 4 >%9 4 9^^ 

3111 031324 


4 4 '^999 

1 1 2737 


000006 


4 99V ^ A 

1 77610 




MOVB 


94 4 /\94 

3112 031332 


4 4 '^'99'9 

1 12737 


000006 


1 77t\2 




M0V8 


9449 M949//\ 

3113 031340 


105037 


4 9'^9 4 f\ 

172310 






CLR8 


94 4 / /\94 9/ / 

3114 031344 


105037 


4 9^9^ 

1 7231 2 






CLR8 


94 4 P' /\94 9P/\ 

3115 031350 


A4 A C* 9 9 

010537 


1 72350 






MOV 


94 4 ^ M94 9P^ 

3116 031354 


/\ 4 A y 99 

010437 


4 9^9 C 

172352 






MOV 


94 4 9 /\949^/\ 

3117 031360 


012737 


140000 


■« 99~»9V 

1 77^ 76 




MOV 


9 4 4 A M 9 4 9/^ 

3118 031366 


000713 








BR 


9 4 4 0\ 9 4 99 A 

3119 031370 


/\9 "^99 9 

032737 


040000 


^ 9999V 

1 77776 


9^ 

7$: 


ATT 

BIT 


94 '^A A94 99^ 

3120 031376 


001026 








BNE 


94 ^4 /\94 / t\F\ 

3121 031400 


f\J 99 

010437 


172250 






MOV 


94^^ /\94/ A y 

3122 031404 


A4 99 

010537 


172252 






MOV 


94 ^9 A94 / 4 A 

3123 031410 


4 4 '^999 

1 12737 


000006 


^ 9"^ 1 A 

172210 




MOVB 


94^/ /\94/4y 

3124 031416 


4 4 "^999 

1 1 2737 


000006 


172212 




MOVB 


94 /\94 / ^/ 

3125 031424 


4 A9 9 

105037 


1 99V 1 A 

177610 






CLRB 


3126 031430 


105037 


< 99V ^ 1. 

1 7761 2' 






1 AA 

CLR8 


94 /\94 / 9/ 

3127 031434 


Ar99 

010537 


1 77650 






MOV 


3128 031440 


/\4 A/ 99 

010437 


1 77652 






MAk i 

MOV 


74 AVI tit 

3129 031444 


/M "S9T9 

012737 


A/ A AAA 

040000 


i 9^^7^ 

1 7777b 




MAk i 

MOV 


3130 031452 


000661 








BR 


3131 031454 


005037 


1 77776 




il Atf 

10$: 


f I A 

CLR 


94 9*^ /\94 i t f\ 

3132 031460 


/\4 "^999 

012737 


A99/ AV 

077406 


■1 9"^ T 1 A 

172310 




MOV 


94 99 /\94 y 

3133 031466 


/\4 0999 

01 2737 


A99y AV 

077406 


172312 




MOV 


949/ A94/9/ 

3134 031474 


012737 


A99/ AV 

077406 


1 99V 1 A 

177610 




MOV 


94 9P A94 

3135 031502 


rt4 "^999 

012737 


A99/ AV 

077406 


177612 




MOV 


949^ /W4P4/\ 

3136 031510 


yh4 AP99 

010537 


4 9"^9rA 

1 72350 






MOV 






1 fCJJC 






HUV 


3138 031520 


010537 


177650 






MOV 


3139 031524 


010537 


177652 






MOV 


3140 031530 


010537 


172250 






MOV 


3141 031534 


010537 


172252 






MOV 


3142 031540 


012737 


003330 


000250 




MOV 


3143 031546 


012737 


031022 


001110 




MOV 



G 8 

13:32 PAGE 78-1 



SfOuENCE 



#100100. RO 

#1 20000. R1 

RO.(RO) 

(R1).R2 

R0.R2 

6$ 

R1.VIRT2 
RO.VIRTI 
PC.FORMPA 
♦20 



VIRTI.RO 
#100. RO 
#100. R1 
R1 .#127700 
5$ 

#1 40000. PSW 
7$ 

R4.UIPAR4 

R5.UIPAR5 

#6.UIPDR4 

#6,UIPDR5 

KiPDR4 

KJPDR5 

R5.KJPAR4 

R4.KiPAR5 

#140000. PSW 

4$ 

#40000. PSW 
10$ 

R4.SJPAR4 

R5.SIPAR5 

#6.SIPDR4 

#6.SIPDR5 

UIP0R4 

UIPDR5 

R5.UIPAR4 

R4,UIPAR5 

#40000. PSW 

4$ 

PSW 

#77406.KIPDR4 

#77406, KIPDR5 

#77406. UIPDR4 

#77406. UIPDR5 

R5.KIPAR4 

R5.KIPAR5 

R5.UIPAR4 

R5.UIPAR5 

R5.SIPAR4 

R5,SIPAR5 

#MG«ERR,MMVEC 

#1$,$LPERR 



P<JT VIRTUAL ADDR. THAT USES PAR4 IN RO 
PUT VIRTUAL ADDR. THAT USES PARS IN R1 
WRITE TO TEST LOC. USING PAR4 
READ THE SAME LOC, BUT USING PARS 
DID WE READ WHAT WE WROTE? 
BRANCH IF YES 

SAVE VIRTUAL ADDR. THAT SELECTED PARS 
SAVE VIRTUAL ADDR. THAT SELECTED PAR4 
60 FORM PHYSICAL ADDRESS BEING USED 
READING LOC. USING PARS AND A VIRT. 
ADDR. DID NOT FIND DATA WRITTEN WHEN USING 
PAR4 AND VIRT. ADDRESS. 

.^r TIGHTER SCOPE LOOP 
K' PLACE ERROR CALL WITH 
'BR 5$" = 000765 
RESTORE V8A IN RO 

CHANGE VIRTUAL ADDRS. TO POINT TO NEXT BLOCK 

WERE BLOCKS FROM 60000-67600 ALL TRIED? 
BRANCH IF NO 

HAVE WE DONE TEST IN USER MODE YET? 
BRANCH IF YES 
LOAD USER PAR4 
LOAD USER PARS 

MAP USER SPACE R/W TO TEST IT 

MAP KERNEL SPACE NON-RESIDENT WHILE 

TESTING USER SPACE 
■MAP KERNEL PAR'S OPPOSITE UIPAR'S 

;G0 TO USER MODE 

;G0 BACK AND READ/WRITE IN USER MODE 

;HAVE WE DONE TEST IN SUPERVISOR MODE YET? 

;BRANCH IF YES 

;LOAD SUPERVISOR PAR4 

;LOAD SUPERVISOR PARS 

;MAP SUPERVISOR SPACE R/W TO TEST IT 

;MAP USER SPACE NON-RESIDENT WHILE 

TESTING USER SPACE 
;MAP USER PAR'S OPPOSITE SIPAR'S 

;G0 TO SUPERVISOR MODE 

;G0 BACK AND READ/WRITE IN SUPERVISOR MODE 
;G0 BACK TO KERNEL MODE BEFORE LEAVING 
; REMAP KERNEL PAGES READ/WRITE 

; REMAP USER PAGES READ/V*«ITE 

;MAP KERNEL, SUPERVISOR AND USER PAR'S 4 & 5 
: BACK TO 12-16K 



.■RESTORE ADDR. OF NORMAL M.M. TRAP ROUTINE 
.•RESET LOOP ON ERROR POINTER TO 1» 



CKMABO 11/44 P€n MOIT PRT A MACRO Mil 13 P3-APR-81 
TEST • 51 - READ AND WRITE WHILE IN REl OCATE MODE 



5U4 031554 000427 BR 

5145 ••••••••••• 

5146 031556 012637 001260 8$: MOV 
3147 031562 012637 001262 MOV 
3148 

5149 
3150 

3151 031566 010037 001276 MOV 

3152 031572 004737 003426 JSR 

3153 031576 013737 177572 001264 MOV 

3154 031604 013737 177576 001270 MOV 

3155 031612 042737 160000 177572 BIC 

3156 031620 104022 ERROR 



3159 
3160 

3161 031622 013746 001262 MOV 

3162 031626 013746 001260 MOV 
5163 031632 000002 RTI 



H 8 

13:32 PAGE 78-2 



SEQUENCE 



TST52 
TRAP TO HERE 
(KSP)*.TRAPPC 
(KSP)*.TRAPPS 



R0.VIRT1 

PC.FORMPA 

SRO.WASSRO 

SR2,UASSR2 

#1 60000. SRO 

♦22 



TRAPPS.-(KSP) 
TRAPPC.-(KSP) 



; .-BRANCH TO NEXT TEST 
THRU ERRVEC 

.•SAVE PC ( PS OF TRAP 



PROGRAM WILL TRAP TO HERE If TRY 

TO USE USER/SUPERVISOR PDR'S WHEN IN KERNEL MODE 

OR KERNEL PDR'S WHEN IN USER/SUPERVISOR MODE 

SAVE VIRTUAL ADDRESS FOR ERROR REPORT 

GO FORM THE PHYSICAL ADDRESS BEING USED 

SAVE SRO ( SR2 FOR ERROR REPORT 

CLEAR ERROR BITS IN SRO 

M.M. TRAP WHILE IN RELOCATE MODE - 

REFERENCED WRONG SET OF PDR'S 

FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

A 'WP" = 000240 

PUT PC ( PS OF TRAP ON STACK 

.•RETURN TO TEST 



I 8 

CKKTABO n/<.4 MEM MGMT PRT A HACRO Mill 3 23-APR-81 13:32 PAGE 79 SEQUENCE 
W-filT TESTS 



3164 .S8TTL W-SIT TESTS 

3165 • 

3166 ; GROUP 4 W-filT TESTS 

3167 ♦ 



ckktabo 11 /aa mem mgmt prt a 

TEST # 52 - W-eiT LOGIC TEST. 
3171 



MACRO Ml 113 
KERNEL PDR'S 



23-APR-81 13:32 PAGE 



J 

80 



SEQUENCE 



31 72 



031634 
031636 
031636 
031642 
031646 
031652 
031656 
031660 
031662 
031666 
031672 
031676 
031704 
031710 
031714 
031720 
031722 
031724 
031726 
031732 
031734 



031736 
031740 
031744 
031750 
031754 
031756 
031760 
031762 



031764 
031770 
031 772 
031 774 
032000 
032002 



000004 

004737 
012702 
012700 
012701 
010120 
077202 
012705 
012704 
012703 
012737 
012700 
012702 
012701 
010120 
077202 
011313 
031527 
001002 
104054 



000422 
012702 
012700 
031027 
001403 
020500 
001401 
104055 



CS2700 
0/721 1 
010115 
031527 
001401 
104056 



S8TTL TEST » 52 - W-BIT LOGIC TEST. KERNEL PDR'S 

"test 52 W-eiT LOGIC TEST. KERNEL PDR'S 

THIS TEST yRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 

(VBA'S = 17776. 37776. 57776. 77776. 11 7776 J 37776 J 57776 & 177776 

& PBA'S CONSTRUCTED = 17776. 37776, 57776. llllfi, 7777t. 

77776. 7777b. % 77776 RESPECTIVELY). 

WHICH SHOULD CAUSE THE 'U-eiT" TO SET IN EACH OF THE 

EIGHT (8) KERNEL PAGE DESCRIPTOR REGISTERS. THE PDR'S 

ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 

PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-BIT 

DOES NOT SET IN ANY OF THE OTHER PDR'S. KERNEL PDR'S 3.4,5 ft 6 

ARE MAPPED TO 12-16K FOR THIS TEST. ALSO THE W-BIT 

SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 

W-BIT PORTION OF THE PDR'S AND THE PAR/PDR ADRS MUX 

ARE BEING CHECKED. 



0021 72 
000004 
172346 
000600 



172300 
000010 
017776 
031704 
172300 
000010 
077406 



0001 00 



000010 
172300 
000100 



001110 



TST52: 
1$: 



2$: 

3$: 

4S: 



5S: 
6$: 



000002 
000100 



7$: 



SCOPE 

JSR 
MOV 
MOV 
MOV 
MOV 
SOB 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 
MOV 
BIT 
BT.'E 
ERROR 



BR 

MOV 

MOV 

BIT 

BEQ 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



PC4T0Fr 
#4.R2 

irKlPAR3.R0 

#600. R1 

RI.(RO)* 

R2.2$ 

#KIPDR0.R5 

#8..R4 

#17776.R3 

»3S.$LPERR 

#KIP0R0,R0 

#8..R2 

#77406. R1 

RI.(RO)* 

R2,4$ 

(R3).(R3) 

(R5).*WB1T 

5$ 

*54 



8S 

#8. .R2 
#KIPDRO,RO 
(RO),#WBIT 
7$ 

R5,R0 

7$ 

*55 



#2.R0 

R2.6$ 

R1.(R5) 

(R5).#WBIT 

8S 

♦56 



TURN T-BJT TRAPPING OFF FOR THIS TEST 

SET LOOP COUNTER TO 4 

LOAD ADDRESS OF KIPAR3 INTO RO 

LOAD 'T2-16K" PAR VALUE INTO Rl 

MAP PARS 3-6 TO 12-16K 

LOOP UNTIL ALL 4 OF THEM ARE LOADED 

LOAD ADDRESS OF flRSl PDR TO BF TESTED IN R5 

SET LOOP COUNTER TO 8 

INITIALIZE VIRTUAL ADDRESS TO BE IN R3 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 

SET LOOP CONTER TO 8 

PUT "W-BIT OFF DATA" INTO Rl 

CLEAR ALL W-6ITS BY WRITING TO ALL PDRS 

LOOP UNTIL ALL OF THEM ARE SET UP 

DO 'DATO" TO VIRTUAL ADDR. -SETTING A W-BIT 

DID THAT CAUSE W-BIT TO BE SET? 

BRANCH IF YES 

W-BIT DID NOT GET SET IN PDR 

FOR TIGHTER SCOPE LOOP. REPLACE ERROR 

CALL WITH 'BR 3$" = 000763 

SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-6ITS 
SET LOOP COUNTER TO 8 

LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
DID W-eiT IN OTHER PDRS REMAIN CLEAR? 
BRANCH IF YES 

IF W-BIT SET. THEN WAS IT PDR UNDER TEST? 
BRANCH IF YES 

W-BIT GOT SET IN MORE THAN ONE PDR 
FOR TGHTE SCOPE LOOP. REPLACE ERROR 
CALL WITH 'BR 3$" = 000750 
POINT RO TO NEXT PDR TO BE CHECKED 
LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-BIT 
WRITE TO THE PDR TESTED TO CLEAR W-BIT 
DID WRITING PDR CLEAR THE W-BIT? 
BRANCH IF YE S 

W-6IT DID NOT CLEAR BY WRITNG THE PDR 

FOR TIGHTER SCOPE LOOP. REPLACE ERROR CALL 



CKHTABO 11 /^<. MEM M»1T PRT A MACRO Ml 1 1 5 23-APfi-81 
TEST # 52 - W-eiT LOGIC TEST. KERNEL PDR'S 



032004 062705 000002 8S: ADD 

032010 062705 020000 ADD 

0320K 077A45 SOB 

032016 012737 031636 001110 MOV 

032024 004737 002226 JSR 



« 
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SEQUENCE 10' 



*2.R5 
#20000. R3 
R4.3$ 
4rlS,SLPERR 
PC. TON 



yiTH "BR 3$" -- 000740 

POINT R5 TO THE NEXT PDR TO BE TESTED 

CHANGE VIRT. ADDR TO REF . NEXT PDR 

LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 

RESET LOOP ON ERROR POINTER TO 1$ 

TURN TH3IT BACK ON FOR NEXT TEST 



CKKTABO 11 /AA ME« MGMT PRT A 
TEST # 53 - W-eiT LOGIC TEST. 

3176 



NACRO Ml 113 23 
SUPERVISOR PDR'S 
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SEQUENCE 



032030 


000004 




3177 032032 


012737 


040000 


3178 032040 


004737 


002172 


032044 


012702 


000004 


032050 


012700 


172246 


032054 


012701 


000600 


032060 


010120 




032062 


077202 




032064 


012705 


172200 


032070 


012704 


000010 


032074 


012703 


017776 


032100 


012737 


032106 


032106 


012700 


172200 


032112 


012702 


000010 


032116 


012701 


077406 


032122 


010120 




032124 


077202 




032126 


011313 




032130 


031527 


000100 


032134 


001002 




032136 


104054 





032140 
032142 
032146 
032152 
032156 
032160 
032162 
032164 



032166 
032172 
032174 
032176 
032202 
032204 



000422 
012702 
012700 
031027 
001403 
020500 
001401 
104055 



062700 
077211 
010115 
031527 
001401 
104056 



000010 
172200 
000100 



000002 
000100 



S8TTL TEST # 53 - W-BIT LOGIC TEST, SUPERVISOR PDR'S 
**************************************************************** 

iTEST 53 W-8IT LOGIC TEST, SUPERVISOR PDR'S 

• THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 

• (VBA'S = 17776.37776,57776,77776,117776,137776,157776 ft 177776 

• t PBA'S CONSTRUCTED ? 17776, 37776, 57776. 77776, 77776, 

• 77776, 77776, t 77776 RESPECTIVELY). 

• WHICH SHOULD CAUSE THE 'X^^IT" TO SET IN EACH OF THE 
EIGHT (8) SUPERVISOR PAGE DESCRIPTOR REGISTERS. THE PDR'S 

• ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 

• PAGE IT IS HAPPED TO IS WRITTEN TO AND THAT THE W-BIT 

• DOES NOT SET IN ANY OF THE OTHER PDR'S. SUPERVISOR PDR'S 3.4.5 t 6 

• ARE MAPPED TO 12-16IC FOR THIS TEST. ALSO THE W-8IT 

• SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 

• W-BIT PORTION OF THE PDR'S AND THE PAR/PDR ADRS MUX 

• ARE BEING CHECKED. 



001110 



TST53: 
1$: 



2$: 

3S: 
4$: 



5$: 
6$: 



7$: 



SCOPE 

MOV 

JSR 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

BIT 

BNE 

ERROR 



BR 

MOV 

MOV 

BIT 

BEQ 

CMP 

BEO 

ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



#40000, PSW 
PC, TOFF 
#4,R2 

#SIPAR3,R0 

#600,R1 

R1,<R0)* 

R2,2S 

#SIP0R0,R5 

#8.,R4 

#17776,R3 

#3$,fLPERR 

#SIPDRO,RO 

#8. ,R2 

#77406, R1 

RI.(RO)* 

R2,4$ 

(R3).<R3) 

(R5),#WBIT 

5S 

♦54 



8S 

#8..R2 
#SIPDRO,RO 
(RO),#veiT 
7$ 

R5.R0 
7$ 

♦55 



#2.R0 

R2,6$ 

R1,(R5) 

(R5),#WBIT 

8S 

♦56 



GO TO SUPERVISOR MODE FOR THIS TEST 

TURN TH3IT TRAPPING OFF FOR THIS TEST 

SET LOOP COUNTER TO 4 

LOAD ADDRESS OF SIPAR3 INTO RO 

LOAD •12-16K" PAR VALUE INTO R1 

MAP PARS 3-6 TO 12-16K 

LOOP UNTIL ALL 4 OF THE« ARE LOADED 

LOAD ADDRESS OF FIRST PDR TO BE TESTED IN R5 

SET LOOP COUNTER TO 8 

INITIALIZE VIRTUAL ADDRESS TO BE IN R3 

SET LOOP ON ERROR POINTER TO 3$ 

LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 

SET LOOP CONTER TO 8 

PUT '\heiJ OFF DATA" INTO R1 

CLEAR ALL W-BJTS BY WRITING TO ALL PDRS 

LOOP UNTIL ALL OF THEM ARE SET IF 

DO 'DATO" TO VIRTUAL ADDR. -SETTING A W-BIT 

DID THAT CAUSE W-BIT TO BE SET? 

BRANCH IF YES 

W-BIT DID NOT GET SET IN PDR 

FOR TIGHTER SCOPE LOOP, REPLACE ERROR 

CALL WITH 'BR 3$' • = 000763 

SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
SET LOOP COUNTER TO 8 

LOAD ADDR. OF FIRST PDR TO BE CHECKED IN RO 
DID W-BJT IN OTHER PDRS REMAIN CLEAR? 
BRANCH IF YES 

IF W-BIT SET. THEN WAS IT PDR UNDER TEST? 
BRANCH IF YES 

W-BIT GOT SET IN MORE THAN ONE PDR 
FOR TGHTE SCOPE LOOP- REPUCE ERROR 
CALL WITH 'BR 3$" = 000750 
POINT RO TO NEXT PDR TO BE CHECKED 
LOOP UNTIL ALL 8 CHECKED FOR CLEAR W-SIT 
WRITE TO THE PDR TESTED TO CLEAR W-BIT 
DID WRITING PDR CLEAR THE W-BIT? 
BRANCH IF YES 

W-BIT DID NOT CLEAR BY WRITNG THE PDR 

FOR TIGHTER SCOPE LOOP, REPLACE ERROR CALL 



CKKT/SBO 11/^^ MEM MGMT PRT A MACRO Mil 13 23-APR-81 
TEST # 53 - W-ejT ^CKIC TEST. SUPERVISOR PDR'S 



052206 062705 000002 8$: ADD 

032212 062703 020000 ADD 

052216 0774^5 SOB 

052220 012757 052052 001110 MOV 

052226 004737 002226 JSR 

3179 032252 005037 177776 CLR 
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SEQUENCE 105 



;UJTH "BR 3$'" = 000740 

#2.R5 .-POINT R5 TO THE NEXT POR TO BE TESTED 

#20000, R5 .CHANGE VIRT. ADDR TO REf . NEXT POR 

R4,3$ .LOOP BACK TO 3$ UNTIL ALL 8 PDR'S TESTED 

#1$.$LPERR .-RESET LOOP ON ERROR POINTER TO IS 

PC, TON .-TURN T-eiT BACK ON FOR NEXT TEST 

PSU .-BACK TO KERNAL MODE BEFORE LEAVING 



CKKJf>BO 11 MEM 
TEST # 5A - W-eiT 

3183 ' 



HGHT PRT A 

LOGIC TEST, 



HACRO M1113 
USER POR'S 
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SEQUENCE 104 



032236 
31 8^ 0322A0 
3185 032246 
032252 
032256 
032262 
032266 
032270 
032272 
032276 
032302 
032306 
0323U 
032320 
032324 
032330 
032332 
032334 
032336 
032342 
032344 



032346 

032350 

032354 • 

032360 

032364 

032366 

032370 

032372 



032374 
032400 
032402 
032404 
032410 
032412 



000004 
012737 
004737 
012702 
012700 
012701 
010120 
077202 
012705 
012704 
012703 
012737 
012700 
012702 
012701 
010120 
077202 
011313 
031527 
001002 
104054 



000422 
.012702 
012700 
031027 
001403 
020500 
001401 
104055 



062700 
07721 1 
010115 
031527 
001401 
104056 



140000 
002172 
000004 
177646 
000600 



177600 
000010 
017776 
032314 
177600 
000010 
077406 



000100 



000010 
177600 
000100 



000002 
000100 



.S8TTL TEST # 54 - W-6IT LOGIC TEST. USER PDR'S 

TEST 54 W-eiT LOGIC TEST. USER PDR'S 

THIS TEST WRITES TO EIGHT (8) DIFFERENT VIRTUAL ADDRESSES 
(VBA'S = 17776.37776.57776.77776,117776,137776,157776 I y7777b 
% PSA'S CONSTRUCTED = 17776. 37776, 57776. 7777h. 7777b. 
7777fi. 77776. I 77776 RESPECTIVELY). 
WHICH SHOULD CAUSE THE 'V-BIT" TO SET IN EACH OF THE 
EIGHT (8) USER PAGE DESCRIPTOR REGISTERS. THE POR'S 
ARE CHECKED TO SEE THAT IT'S W-BIT DOES SET WHEN THE 
PAGE IT IS MAPPED TO IS WRITTEN TO AND THAT THE W-eiT 
DOES NOT SET IN ANY OF THE OTHER PDR'S. USER POR'S 3.4.5 I 6 
ARE MAPPED TO 12-16IC FOR THIS TEST. ALSO THE W-BIT 
SHOULD BE CLEARED WHEN THE PDR IS WRITTEN TO. THE 
W-6IT PORTION OF THE PDR'S AND THE PAR/PDR ADRS MUX 
ARE BEING CHECKED. 



TST54: 
177776 1$: 



2$: 



001110 



3$; 
4S: 



5$: 
6$: 



7$: 



SCOPE 

MOV 

JSR 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

SOB 

MOV 

BIT 

BNE 

ERROR 



BR 

MOV 

MOV 

BIT 

BEO 

CMP 

BEQ 

ERROR 



ADD 
SOB 
MOV 
BIT 
BEQ 
ERROR 



#1 40000. PSW 
PC. TOFF 
#4.R2 

*UI PAR3.ro 

*600,R1 

R1.(R0)+ 

R2,2$ 

*UIPDR0.R5 

#8.,R4 

#17776,R3 

#3S,$LPERR 

*UIPORO.RO^ 

#8. ,R2 

#77406. R1 

RI.(RO)* 

R2.4$ 

(R3).(R3) 

(R5),*WBIT 

5S 

♦54 



8$ 

#8.,R2 
*UIPDRO,RO 
(RO) .mJBU 
7$ 

R5.R0 

7S 

+55 



#2.R0 

R2.6$ 

R1.(R5) 

(R5),*WBIT 

8$ 

♦56 



GO TO USER MODE FOR THIS TEST 

TURN T-eiT TRAPPING OFF FOR THIS TEST 

SET LOOP COUNTER TO 4 

LOAD ADDRESS OF UIPAR3 INTO RO 

LOAD •T2-16K" PAR VALUE INTO R1 

MAP PARS 3-6 TO 12-16K 

LOOP U^TIL ALL 4 OF THEM ARE LOADED 

LOAD ADDRESS OF FIRST PDR TO BE TESTED IN R5 

SET LOOP COUNTER TO 8 

INITIALIZE VIRTUAL ADDRESS TO BE IN R3 

SET LOOP ON ERROR POINTER TO 3S 

LOAD ADDR. OF FIRST PDR TO BE SETUP IN RO 

SET LOOP CONTER TO 8 

PUT 'V-BIT OFF DATA" INTO Rl 

CLEAR ALL W-BITS BY WRITING TO ALL PDRS 

LOOP UNTIL ALL OF THEM ARE SET UP 

DO 't)ATO" TO VIRTUAL ADDR. -SETTING A W-BIT 

DID THAT CAUSE W-BIT TO BE SET? 

BRANCH IF YES 

W-BIT DID NOT GET SET IN PDR 

FOR TIGHTER SCOPE LOOP, REPLACE ERROR 

CALL WITH 'BR 3$" = 000763 

SKIP CHECKING OTHER PDR'S-ERROR WILL SET W-BITS 
SET LOOP COUNTER TO 8 

LOAD ADDR.- OF FIRST PDR TO BE CHECKED IN RO 
DID W-6IT IN OTHER PDRS REMAIN CLEAR? 
BRANCH IF YES 

IF W-BIT SET, THEN WAS IT PDR UNDER TEST? 
BRANCH IF YES 

W-BIT GOT SET IN MORE THAN ONE PDR 
FOR T6HTE SCOPE LOOP, REPLACE ERROR 
CALL WITH 'BR 3$" = 000750 
POINT RO TO NEXT PDR TO BE CHECKED 
LOOP UNTIL ALL 8 CHECKED FOR CLEAR VJ-BIT 
WRITE TO THE PDR TESTED TO CLEAR W-BIT 
DID WRITING PDR CLEAR THE W-BIT? 
BRANCH IF YES 

W-eiT DID NOT CLEAR BY WRUNG THE PDR 

FOR TIGHTER SCOPE LOOP, REPLACE ERROR CALL 



(.KK^»BO IWAA P«€« >WT PRT A WACRO M1113 
TEST * - W-eiT LOGIC TEST. USER POR'S 



^3-APR-8^ 



06^705 00000^ 8$: ADD 

062703 020000 ADD 

052A24 077A45 SOB 

032426 012737 03Z240 001110 MOV 

03243A 0OA737 0C2226 JSR 

3186 032<.40 005037 177776 CLR 
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SEOUEMCF 



'WITH 'BR 3S" = 0007^0 
#2.R5 !pOINT R5 TO TH£ N6XT POfi TO B£ TESTED 

*20OO0.R3 .CHANGE VIRT. ADOR TO REF . N6XT POR 

.LOOP BACK TO 3$ If^TlL ALL 8 POR'S TESTED 
flS.SLPERR .RESET LOOP ON ERROR POINTER TO IS 

PC. TON .TURN T-eiT BACK ON FOR NEXT EST 

PSy .BACK TO KERNEL MODE BEFORE LEAVli\G 



C 9 
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TEST t 55 - TEST "V-BIT NOT SET" CASES 



SEOt-ENCE 



3197 



5198 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
32K 



0324A4 
032AA6 
032A52 
032A56 
032464 
032470 
032476 
032502 
032506 
032512 
032514 
032516 



032520 
032526 
032534 



000004 
004737 
012701 
012737 
010137 
012737 
005237 
012706 
013702 
020102 
001401 
104057 



012737 
012737 
004737 



002172 
077406 
032456 
172306 
032502 
060001 
001100 
172306 



003232 
032446 
002226 



S8TTL TESr # 55 - TEST 'V-eiT NOT SET" CASES 
'test 55 TEST 'V-filT NOT SET" CASES 



THIS TEST CHECKS TWO SPECIAL CASES WHERE THE W-Sn DOES 
NOT GET SET ON A WRITE. FIRST CASE IS THAT THE W-BIT 
SHOULD NOT SET IN PAGE DESCRIPTOR REG. 7 WHEN WRITING TO 
STATUS REG SRO (KERNEL PDR 7 IS USED). SECOND CASE IS THAT 
THE W-eiT IS NOT SET IF THE "DATO" IS ABORTED DUE TO AN 
ODD ADDRESS ERROR (KERNEL PDR3 I VIRTUAL ADDR 60001 ARE USED) 



TST55; 
1$: 



001110 2$: 



000004 



3$: 



000004 
001110 



4$: 



SCOPE 

JSR PC.TOFF 

MOV #77406, R1 

MOV #2$.$LPERR 

MOV R1,KIPDR3 

MOV #3$.ERRVEC 

INC 60001 

MOV fKERSTK,KSP 

MOV KIPDR3,R2 

CMP R1,R2 

BEQ 4$ 

ERROR +57 



MOV #TIMERR.ERRVEC 
MOV *1$.$LPERR 

JSR PC. TON 



TURN OFF T-BIT TRAPPING FOR THIS TEST 

PUT '\heiJ OFF" VALUE FOR POR IN R1 

SET LOOP ON ERROR POINTER TO 2$ 

LOAD KERNEL PDR3 WITH 77406 TO CLEAR W-BlT 

SET UP LOC. 4 TO 3$ FOR ODD ADDR. ABORT 

CAUSE ODD ADDRESS ABORT THRU LOC. 4 

RESTORE THE STACK POINTER 

READ KIPDR3 INTO R2 

WAS W-eiT LEFT CLEARED? 

BRANCH IF YES 

W-Bir GOT SET DURING AN ODD ADDR. ABORT 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
'BR 2$" = 000757 

RESTORE NORMAL CPU TRAP ROUTINE TO LOC. 4 
RESET LOOP ON ERROR POINTER TO 1$ 
TURN T-eiT TRAPPING BACK ON 



CKKTASO 11/44 MEM MGMT PRT A 
END OF PASS WXJTINE 

3?15 



0 9 
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,S8TTL END OF PASS ROUTINE 



SEQUENCE lOr 



•INCREMENT THE PASS NUMBER (SPASS) 

•TYPE "END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY' 
•WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS 
•IF SW12=1 INHIBIT TRACE TRAP 



03<:dh0 






032540 


000004 




032542 


005037 


001102 


03cl>4o 




AA1 0X0 






1 rtrtrtrtrt 


0S2560 


005327 




032562 


000001 






Art 7/^75 




032566 


012737 




032570 


000001 




\JJCJf C 


rt75^AD 




\J JCJ'** 


1 <v.Ani 
1 y«»*»u 1 






/vw.n7 












\J \ Jf HO 


AAI p»5 


032624 


104405 




032626 


104401 


032634 




rtOAA31 




UOc O ' O 










1 1 1 c 












vAJ 1 CC 1 


ATp^l A 


aa«:a77 


nni IIP 

Uv 1 1 1 c 


n'X57iz. 


U 1 Ji\AJ 


v\AA/*»c 


n'^?7Pn 
\Jjcf c\J 






nT5755 


nrt^fu.A 




yJjCf C* 


01 ?7L.f\ 


nx?7X? 

\tJCI jC 


nT?7V> 
\JjCf jU 


VAA/*»cO 




nT5773 

\JjCf JC 






032732 


013700 


000042 


032736 


001405 




032740 


000005 




032742 


004710 




032744 


000240 




032746 


000240 




032750 


000240 




032752 






032752 


104400 




032754 


042716 


000020 


032760 


032777 


010000 


032766 


001005 




032770 


005137 


001346 


032774 


100402 




052776 


052716 


000020 



;*IF 
.••IF 
$EOP 



THERES A MONITOR 60 TO IT 
tHERE ISN'T Jlf¥> TO LOOP 



001232 



SEOPCT: 



SENDCT: 



;;65$: 
64S: 



;;67$: 
66$: 



$6ET42: 



SCLR.T: 



SENDAD: 



SDOAGN: 



146152 



SCOPE 




CLK 




fur 
INL 




□ i L 




DEC 


(PC)* 


.WORD 


1 


BGT 


SDOAGN 


MOV 


(PC)*,a(PC)* 


. wunu 


1 

1 






T VPP 




OK 


OH* 


A^r T 7 


V ic^^ 1 J^ft nil/ 




•tMOO 0 \ Or/ 


TYPDS 




TYPE 


,67$ 


BR 


66$ 


.ASCIZ 


/ TOTAL ERRO 


MOV 


$ERTTL.-(SP) 


TYPDS 




TYPE 


,$CRLF 


CLR 


SERTTL 


MOV 


air42,R0 


BEO 


$DOAGN 


CLR 


-(SP) 


MOV 


#$CLR.T,-(SP) 


BR 


SRTRN 



MOV 

BEO 

RESET 

JSR 

NOP 

NOP 

NOP 

TRAP 
BIC 
BIT 
BNE 

ca: 

BMI 

BIS 



;;ZERO THE TEST NLfBER 
.-.INCREMENT THE PASS NLfBER 
: .-DON'T ALLOW A NEC. NUMBER 
;;LOOP? 



;;YES 
.-.RESTORE 



COUNTER 



.-.TYPE ASCIZ STRING 
;;GET OVER THE ASCIZ 
PASS »/ 



SAVE $PASS FOR TYPEOUT 
TYPE PASS NUMBER 

GO TYPE—DECIMAL ASCII WITH SIGN 
TYPE ASCIZ STRING 
GET OVER THE ASCIZ 
SINCE LAST REPORT / 



SAVE SERTTL FOR TYPEOUT 

TOTAL NUFCER OF ERRORS 

GO TYPE— DECIMAL ASCII WITH SIGN 

TYPE CARRIAGE RETURN, LINE FEED 

CLEAR ERROR TOTAL 

GET MONITOR ADDRESS 

BRANCH IF NO MONITOR 

INSURE THE 'T' BIT IS CLEAR 

SETUP FOR AN RTI OR RTT 

GO DO AN RTI OR RTT TO LOAD THE PSW 

WITH A CLEARED 'T' BIT 



air42.R0 
$D0AGN 

PC.(RO) 



#20. (SP) 

4rBIT12.aSWR 

1$ 

STBIT 
1$ 

#20. (SP) 



THE MONITORS 



INSURE RO CONTAINS 

RETURN ADDRESS 

CLEAR THE WORLD 

60 TO MONITOR 

SAVE ROOM 

FOR 

ACT11 



PUSH OLD PSW AND PC ON STACK 
CLEAR THE IT' BIT 
R\Ji WITH TRACE TRAP? 
BR IF NO 

IS IT TIME FOR TRACE TRAP 

BR IF NO 

SET TRACE TRAP 



END OF PASS ROUTINE 

03500? 012746 033010 
035006 000002 
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1$: 

tRTRN: 



MOV 
RTI 



#$L0OP.-{SP) 



033010 

035010 000157 

055012 020454 

0550U 377 



577 



SLOOP: 

JMP a(PC)* 
SRTNAD: .WORD LOOP 
000 SENULL: .BYTE -1.-1.0 
.EVEN 



V 



.JUMP TO START OF TEST 
.RETURN— THIS IS CHANGED TO 
;AN "IRTT" IF "RJV IS A LEGAL 
.INSTRUCTION 

.•RETURN 

.■NULL CHARACTER STRING 



SEQUENCE 108 



CKKTABO n/AA 
SCOPE HANDLER 

5217 



MEM MGMT 

ROUTINE 



PRT A MACRO Mil 13 



F 9 
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SEQUENCE 109 



.S8TTL SCOPE HAWLER ROUTINE 



•THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
•AND LOAD THE TEST NlfeER($TST^#1) INTO THE DISPLAY REG. (DISPLAY<7:C>5 
•AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<1 5 :08> 
•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE : 
LOOP ON TEST 
LOOP ON ERROR 
LOO? ON TEST IN SWR<7:0> 



•SWU=1 
•SU09=1 
•SU08=1 
•CALL 



053020 
035020 
033022 
033030 



10AA10 
032777 
001077 



040000 H6110 IS: 



033032 000416 



SCOPE 
SSCOPE : 

CKSUR 
BIT 
BNE 

;*##*#START OF 
SXTSTR: BR 



;; SCOPE =IOT 



#8ITU,aSWR 
SOVER 
CODE FOR THE XOR 
6$ 



033034 


015746 


000004 






MOV 


a#ERRVEC,-(SP} 


033040 


012757 

VIC' 


055060 


000004 

V w w~ 




MOV 


#5S.a#ERRVEC 
*ri 77060 


035046 


005757 


177060 






TST 


053052 


012657 


000004 






MOV 


(SP) >,a#ERRVEC 


053056 


000446 








BR 


isVLAD 


033060 


022626 






5$: 


CMP 


(SP)*,(SP)+ 
(SP)-*^,a#ERRVEC 


055062 


012637 


000004 

WWW" 






MOV 


053066 


000434 








BR 


7$ 


053070 








6S::«#^#^END OF 


CODE FOR THE XOR 


053070 


052777 


000400 


146042 




BIT 


«BIT08,aSWR 


033076 


001404 








BEQ 


2$ 


053100 


127737 


146054 


001102 




CMP6 


aSWR.STSTftfl 


035106 


001450 








BEQ 


SOVER 


055110 


013757 




035244 


2$: 


MOV 


177766. CPSAVE 


055116 


052757 


000001 


055244 




BIT 


*8I TOO. CPSAVE 


055124 


001406 








BEQ 


2000S 


055126 


042757 


000001 


177766 




BIC 


*8J TOO. 177766 


033154 


104177 








EMT 


♦177 


055136 


105057 


001103 






CLRB 


SERFLG 


055142 


105757 


001103 




2000$: 


TST8 


SERFLG 


053146 


001412 








BEQ 


SSVLAD 


033150 


032777 


001000 


145762 




BIT 


«8JT09.aSWR 


033156 


001404 








BEQ 


4S 


035160 


015757 


001110 


001106 


7$: 


MOV 


SLPERR.SLPADR 


035166 


000420 








BR 


SOVER 


055170 


105057 


001103 




4$: 


CLRB 


SERFLG 


055174 


105257 


001102 




SSVLAD: 


INC8 




055200 


115757 


001102 


001250 




M0V8 


STSTf#t.STESTN 


055206 


011657 


001106 






MOV 


(SP).SLPADR 


055212 


011657 


001110 






MOV 


(SP).$LPERR 


055216 


005037 


001212 






CLR 


SESCAPE 


055222 


112737 


000001 


001115 




M0V8 


^l.SERMAX 


033230 


013777 


001102 


145704 


$OVER: 


MOV 


STSTf#t.aDI SPLAY 


033236 


013716 


001106 






MOV 


SLPADR.(SP) 


033242 


000002 








RTI 




035244 


000000 






CPSAVE : 


.WORD 


0 



.•TEST FOR CHANGE IN SOFT-SWR 
.LOOP ON PRESENT TEST? 
;YES IF SWl4s1 
TESTER#M## 
;IF RUNNING ON THE "XOR" TESTER CHANGE 
.-THIS INSTRUCTION TO A "VfX*" (NOP=240) 
.•SAVE THE CONTENTS OF THE ERROR VECTOR 
;SET FOR TIMEOUT 
.TIME OUT ON XOR? 
.•RESTORE THE ERROR VECTOR 
;G0 TO THE NEXT TEST 
.•CLEAR THE STACK AFTER A TIME OUT 
.•RESTORE THE ERROR VECTOR 
.-LOOP ON THE PRESENT TEST 
TESTER##### 
;LOOP ON SPEC. TEST? 
:BR IF NO 

;0N THE RIGHT TEST? SW*<7:0> 
'BR IF YES 

MOVE CPU ERR REG VALUE TO LOC FOR TST 
SEE IF THE POWER MONITOR BIT IS ON 
BRANCH TO CONTINUE ROUTINE IF CLEAR 
CLEAR THE BIT FOUND TO BE SET 
CALL SPECIAL POWER FAIL BIT ERROR CALL 
CLEAR THE FLAG FOR THE NEXT CHECK 
DID AN ERROR OCCUR? 
BR IF NO 
LOOP ON ERROR? 
BR IF NO 

SET LOOP ADDRESS TO LAST SCOPE 

ZERO THE ERROR FLAG 
COUNT TEST NUMBERS 
SET TEST NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP ADDRESS 
SAVE ERROR LOOP ADDRESS 
CLEAR THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONE(l) ERROR ON NEXT TEST 
DISPLAY TEST NUMBER 
FUDGE RETURN ADDRESS 
FIXES PS 

LOCATION TO SAVE CPU ERR REG CONTENTS 



DPM001 
DPM001 
DPM001 
DPM001 
DPM001 
DPM001 



iDPMOOl 
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,S8TTL ERROR HANDLER ROUTINE 



SEQUENCE no 



•THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT. 
•SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
•AND GO TO ERRTYP ON ERROR 

•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

•SU15=1 HALT ON ERROR 

*SW13=1 INHIBIT ERROR TYPEOUTS 

*SW10=1 BELc ON ERROR 

•SW09=1 LOOP ON ERROR 

•CALL 

• ERROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 



033<:ho 








»tnHUK : 


n DO 


tQC A V/C 












CUD 






ni fv\x7 


1 A5 






Mnv/ 
nuv 


on xsi^ckCs 

ry\j , >nc V3U 




nmi 77 


Uv 1 1 o*» 






nuv 


Dl U>P(^1 
n 1 t ^nC u 1 


r\'fx'i7t\ 


ni n577 


lAj 1 1 OO 






Mnv/ 
nuv 


D5 V}pr:5 


ni r>777 


nni 1 7n 
UU \ \ f\) 






MDV/ 

nuv 


d7 carr:7 

r\J , *r<C VJ J 


Ujjcf *» 




(V\^ 1 75 

UVJ lire 






nmv/ 
nuv 






ni n^77 


nni 1 7Z. 
UU 1 1 r *» 






nmv/ 
nuv 


n J »*nCV9 J 


UjjXH* 


1 1 7777 


m5 
UU 1 1 \Jc 


nni 5^z. 

UU 1 C JH 




nuvo 


$TST»^.TESTNO 


\j5jj\c 


1 nC!>77 


(v\^ 1 n7 

UU 1 1 Uj 




7t • 

f * . 


I Kirn 




r»7771 A 


Ar»i 77*; 

lAJ \ I fj 








DC u 


f • 




t\^ 7777 


105 

UU 1 1 \Jc 


1 H JO I 




Mnv/ 
nuv 


(TCTIUM anTCPlAV 
# 1 d 1 rwn , OH/ i T 


n7775A 


075777 




1 H JOUH 




BIT 


JTRTTin acuQ 
^Oi 1 1 U « Oidwn 


n7777Z 










RPQ 
DCU 


1C 

1 9 




1 A/.Z.rt1 
1U«»*»U 1 


nni 51 z. 
UU 1 c 1 •» 






T VDP 


CBPI 1 


ri777Z 3 


rtrt^577 
UUjc Jf 


nni 115 

UU 1 1 1 £ 




1 1 • 

1 « ■ 


I Kir 


$ERTTL 




m 1 A77 

U 1 1 Oj r 


nni 1 1 A 

UU 1 1 1 o 






Mnv/ 
nuv 




n777^5 




UUUUUc 


nni 1 1 A 

UU 1 1 1 o 






ir5 CFRRPr 


n777AA 
UjjjOU 


1 1 7777 


1 H J J JC 


nni ^^L 

UU 1 1 1 H 




nuvo 




U jjjOO 


^ 55777 


nnni 77 

UUU 1 f t 


nni 1 1 A 

UU 1 1 1 *f 




TMPQ 


jri 77 CTTFMR 
n \ f f ,91 1 cnD 


n7777Z. 


nni z. 5A 










mm t 

1 UU 1 9 


n7777A 


1 n^777 

IUj' Jf 


n77A5A 
UjjOch 






1 O lO 


TDCAV/F 
iOOMVC 




001021 








BNE 


1000$ 


033404 


013737 




033244 




MOV 


1 77766, CPSAVE 


033412 


032737 


000001 


033244 




BIT 


*8IT00,CPSAVE 


033420 


001414 








BEO 


1001$ 


033422 


042737 


000001 


177766 




61 C 


#81 TOO. 177766 


033430 


113737 


001114 


033624 




MOVE 


$ITEMBJBSAVE 


033436 


112737 


000177 


001114 




MOVB 


*177.$ITEnB 
1001$ 


033444 


000402 








BR 


033446 


105037 


033624 




1000$: 


CLR8 


IBSAVE 


033452 








1001$: 






033452 


032777 


020000 


145460 




BIT 


jrBiTi3,asuR 


033460 


C01004 








BNE 


20$ 


033462 


004737 


033626 






JSR 


PC. ERRTYP 


033466 


104401 


001221 






TYPE 


,$CRLF 


033472 








20$: 




033472 


122737 


000001 


001244 




CMPe 


#APTENV.$ENV 


033500 


001007 








BNE 


2$ 


033502 


113737 


001114 


033514 




MOVB 


$ITEMB,21$ 


033510 


004737 


035752 






JSR 


PC.$ATY4 


033514 


000 






21$: 


.BYTE 


0 


033515 


000 








.BYTE 


0 



CLEAR THE ITEM BYTE SAVE LOCATION 

.TEST FOR CHANGE IN SOFT-SWR 

SAVE THE CONTENTS OF RO 

SAVE THE CONTENTS OF Rl 

save; THE CONTENTS OF R2 

SAVE THE CONTENTS OF R3 

SAVE THE CONTENTS OF R4 

SAVE THE CONTENTS OF R5 

SAVE THE TEST Nl/BER 

;SET THE ERROR FLAG 

; DON'T LET THE FLAG GO TO ZERO 

.•DISPLAY TEST Nl/BER AND ERROR FLAG 

.-BELL ON ERROR? 

;N0 - SKIP 

.-RING BELL 

.•COUNT THE NlfBER OF ERRORS 

;GET ADDRESS OF ERROR INSTRUCTION 

.■STRIP AND SAVE THE ERROR ITEM CODE 
SEE IF THIS IS THE POWER FAIL CALL 
BRANCH AROUND ROUTlrJE IF IT IS 
SEE IF THIS IS THE 2ND ERROR CALL 
BRANCH IF SO 

MOVE CPU ERR REG TO CPSAVE FOR TEST 

SEE IF POWER MONITOR BIT IS SET 

BRANCH IF OK 

CLEAR THE BIT FOUND SET 

MAKE IBSAVE NON-ZERO FOR DUAL CALL 

SET $ITEMB TO SPECIAL POWER FAIL PNTR 

BRANCH OVER IBSAVE CLEARING 

CLEAR IBSAVE SO AFTER 2ND ERROR. EXIT 

SKIP TYPEOUT IF SET 

SKIP TYPEOUTS 

GO TO USER ERROR ROUTINE 



RUNNING IN APT MODE 

NO. SKIP APT ERROR REPORT 

SET ITEM NUMBER AS ERROR NUMBER 

REPORT FATAL ERROR TO APT 



;DPM001 



DPM001 
DPM001 
DPMOOl 
DPMOOl 
DPMOOl 
DPM001 
DPM001 
DPM001 
DPM001 
DPM001 
DPM001 
DPM001 
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035516 


000777 




22$- 


BR 


22$ 


053520 


105737 


033624 


2$- 


TST8 


IBSAVE 


033524 


001005 






BNE 


3S 


033526 


005777 


145406 




TST 


9SUR 


033532 


100002 






BPL 


3S 


033534 


000000 






HALT 




033536 


104410 






CKSyR 




033540 


032777 


001000 


145372 3S: 


BIT 


4'8iT09.aSUR 


033546 


001405 






BFO 


4S 


033550 


105737 


033624 




TST8 


IBSAVE 


033554 


001256 






RNF 


7$ 


033556 


013716 


001 110 




nov 


SLPERR (SP) 


033562 


005737 


00121? 


4S: 


TST 


SESCAPE 


033566 


001405 






BFO 


5$ 


033570 


105737 


033624 




TSTB 


IBSAVE 


033574 


001246 






BNF 


7$ 


033576 


013716 


001212 




MOV 


iFSCAPE (SP) 


033602 






5$: 






033602 


022737 


032742 


000042 


CMP 


#SENDAD a#42 


033610 


001001 






BNF 


6t 


033612 


000000 






HAL T 




033614 












033614 


105737 


033624 




TSTB 


IBSAVE 


033620 


001234 






BNE 


7$ 


033622 


000002 






RTI 




033624 


000000 




IBSAVE: .WORD 


0 



SEQUENCE 



.APT ERROR LOOP 

SEE IF POWER FAIL ERROR CALL ;DP«001 

BRANCH IF NOT - HALT NOT ALLOWED .DPMOOI 

.•HALT ON ERROR 

.-SKIP JF CONTINUE 

.•HALT ON ERROR! 

.•TEST FOR CHANGE IN SOFT-SWH 

.•LOOP ON ERROR SWITCH SET? 

;8R IF NO", 

SEE IF THIS ERROR CALL IS PWR MON ERR .DPMOOI 
BRANCH BACK IF SO - DON'T ALLOW FUDGING; DPM001 
.FUDGE RETURN FOR LOOPING 
.•CHECK FOR AN ESCAPE ADDRESS 
;BR IF NONE 

SEE IF THIS ERROR CALL IS PWR MON ERR .DPMOOI 
BRANCH BACK IF SO - DON'T ALLOW FUDGING; DPMOOI 
;FUDGE RETURN ADDRESS FOR ESCAPE 

;ACT-11 AUTO-ACCEPT? 
;BRANCH IF NO 
;rES 

SEE IF THIS IS THE PWR FAIL ERROR CALL ;DPM001 
BRANCH BACK TO CALL ORIGINAL ERR IF SO ;DPM001 
; RE TURN 

LOC'N TO HOLD SITEMB DURING DUAL ERR ;DPf1001 
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3221 


033626 


10440'' 


001221 


ERRTYP: 


TYPE 


3222 


033632 


010046 






MOV 


3223 


033634 


005000 






CLR 


3224 


033636 


153700 


0011 14 




BIS8 


3225 


033642 


001004 






BNE 


3226 












3227 


033644 


013746 


001116 




WOV 


3228 












3229 


033650 


104402 






TYPOC 


3230 


033652 


000530 






BR 


3231 


033654 


122700 


000177 


1$: 


CMP8 


3232 


033660 


y%y^4 y^y^T 

001003 






BNE 


3233 


033662 


012700 


y\ T y 4 PA 

034150 




MOV 


3?»54 


033666 


000406 






BR 


3235 


y\w^ ^A 

033670 






4 AA* 

100$: 




3236 


033670 


y\y\p Ty\/\ 

005300 






DEC 


3237 


033672 


y\/%y T/\y\ 

006300 






ASL 


3238 


033674 


y\/%y T/\y\ 

006300 






ASL 


3239 


y\w^ ^ ^ 

033676 


y\/%y TAA 

006300 






ASL 


5240 


033700 


062700 


y\y\ 4 T 

001372 




ADD 


3241 


AW "7 Ay 

033704 


A4 ^ATT 

01 2037 


ATT 71 y 

033714 


4 1 Atf 

1 lO$: 


MOV 


3242 


aw^^ a 

033710 


AA4 y Ay 

001404 






AP A 

BE (3 


3243 


033712 


4 Ay y A 4 

104401 






TYPE 


3244 


aw^4 y 

033714 


Ay\AAAA 

000000 




2$: 


1 lAAA 

.kXjRD 


3245 


033716 


■1 Ay y Ai 

104401 


A A 1 T T 1 

00122) 




TYPE 


3246 


033722 


A1 '\f\TJ 

012037 


ATT TT O 

033732 


3$: 


MAI J 

MOV 


3247 


033726 


aai y Ay 

001404 






OF A 

BEQ 


3248 


AV V'TVA 

033730 


4 Ay y A4 

104401 






TtPc 


3249 


033732 


AAAAAA 

000000 




4*: 


.WORD 


3250 


033734 


i Ay y Ai 

104401 


A A 1 "5 T 1 

001221 




T WDC 

T Yrc 


3251 


A A 

033740 


A4 A 4 y ^ 

010146 




5S: 


MAI J 

MOV 


3252 


033742 


Ai "iAAl 

012001 






MAI/ 

MOV 


3253 


A y y 

033744 


001472 






BEO 


3254 


033746 


A 4 '^AAA 

012000 






MOV 


3255 


AV V A 

033750 


4 Af T4 A 

105710 




6$: 


TST8 


3256 


033752 


AA1 AAT 

001003 






BNE 


3257 








; •THIS 


CODE IS 


3258 


A V T "VC y 

033754 


A 4 T 4 y ^ 

013146 






MAt J 

MOV 


3259 


033756 


4 Ay y A"^ 

104402 






TYPOC 


3260 


033760 


AAAy 

000456 






A A 

BR 


3261 








••THIS 


y AAP f e' 

CODE IS 


3262 


033762 


4 ^4 A^^ 

121027 


AAA A A 4 

000001 


7i: 


CMP8 


3263 


033766 


AA1 AAT 

001003 






BNE 


If y 

3264 


AT T^'^A 

033770 


A 4 7 4 y ^ 

013146 






MAt J 

MOV 


3265 


033772 


4 Ay y AC 

104405 






TYPDS 


3266 


AT VT^y 

033774 


AAAy CA 

000450 






AA 

BR 


3267 








; •THIS 


CODE IS 


3268 


ATT 

033776 


4 ^4 A^T 

121027 


A AAA A 

000002 


8$: 


CMPB 


3269 


ATy ^^"^ 

054002 


AA4 AAT 

001003 






BNE 


3270 


AT y AA / 

034004 


A4 T 4 y ^ 

013146 






MOV 




0j400o 








T VDQiU 


3272 


034010 


000442 






BR 


3273 








.••THIS 


CODE IS 


3274 


034012 


121027 


000003 


9$: 


CMPB 


3275 


034016 


001011 






BNE 


3276 


034020 


012146 






MOV 


3277 


034022 


004737 


037024 




JSR 



.SCRLF 

RO.-(KSP) 

RO 

SITEMB.RO 
1$ 

$ERRPC.-(SP) 



13$ 

#1 77. RO 
100$ 

#PF ECWS.RO 
110$ 

RO 
RO 
RO 
RO 

mRRTB.RO 
(R0J*.2$ 
3$ 

0 

.$CRLF 
(R0)-^.4$ 
5$ 

0 

.$CRLF 
R1,-(KSP) 
(R0J-t-,R1 
12$ 

(ROJ-^.RO 
(RO) 
7$ 

FOR OCTAL (16-H3IT 
a(R1)-^,-(SP) 

11$ 

FOR DECIMAL FORMAT (DF=1) 



SEOUENtf 112 



"CARRIAGE RETURN" i "LINE FEED" 
SAVE RO. 

PICKUP THE ITEM INDEX 

IF ITEM NlfBER IS ZERO. JUST 
TYPE THE PC OF THE ERROR 
;SAVE $ERRPC FOR TYPE OUT 
.ERROR ADDRESS 

.•GO TYPE— OCTAL ASCIKALL DIGITS) 
GET OUT 

SEE IF THIS ERROR CALL IS THE POWER MONITOR BIT CALL 
BRANCH IF NOT 

MOVE ADDRESS OF POWER MONITOR BIT ERROR TO RO 
BRANCH TO CALL THE ERROR 

ADJUST THE INDEX SO THAT IT WILL 
WORK FOR THE ERROR TABLE. 



FORM TABLE POINTER 
PICKUP "ERROR MESSAGE" POINTER 
SKIP TYPEOUT IF NO POINTER 
TYPE THE "ERROR MESSAGE" 
■"ERROR MESSAGE" POINTER GOES HERE 
"CARRIAGE RETURN* • t 'UNE FEED" 
PICKUP 'DATA HEADER" POINTER 
SKIP TYPEOUT IF 0 
TYPE THE 'DATA HEADER" 
'DATA HEADER" POINTER GOES HERE 
"CARRIAGE RETURN" & 'VINE FEED" 
SAVE Rl 

PICKUP 'DATA TABLE" POINTER 
BR IF NO DATA TO BE TYPED 
PICKUP 'DATA FORMAT" POINTER 
IS IT FORMAT 0? 
BR IF NO 

FORMAT (DF=0) 
;SAVE a(Rl)+ FPR TYPEOUT 
;G0 TYPE— OCTAL ASCIKALL DIGITS) 



(R0),#1 
8$ 

a(R1)-^.-(SP) 
11$ 

FOR BINARY FORMAT 
(R0),#2 
9$ 

a(Rl)+,-(SP) 
11$ 



IS IT FORMAT 1? 
BRANCH IF NO 
.•SAVE a(Rl)* FOR TYPEOUT 
;G0 TYPE— DECIMAL ASCII WITH SIGN 

(DF=2) 

IS IT FORMAT 2 

BRANCH IF NO 

.•SAVE a(Rl)* FOR TYPEOUT 

;G0 TYPE— BINARY ASCII 



FOR OCTAL (22-BIT) FORMAT (DF=3) 



(RO) ,#3 
15$ 

(R1)+.-(KSP) 
PC.$DB20 



IS IT FORMAT 3? 
BRANCH IF NO 

PUT ADDRESS OF FIRST LOC. ON STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 
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SECUE\CF 



^ 1 ^ 



3278 

5279 

5280 

3281 

5282 

5283 

3284 

5285 

5286 

3287 

3288 

3289 

3290 

5291 

3292 

3293 

3294 

3295 

3296 

5297 

3298 

3299 

3300 

3301 

3302 

3503 

3304 

3305 

3306 

3507 

3308 

3309 

3310 

3311 

3312 

3313 

3314 



054026 
054 0 32 
054056 
034040 

054042 
034044 
034046 
034050 
034052 
034056 
054062 
034066 
034072 
034076 
054102 
054106 
054110 
054112 
054114 
054116 
054120 
054122 
054126 
054150 
054152 
054154 
054156 
054142 
054144 

054150 
054160 
054220 

054250 
054260 



062716 


000003 






ADD 


f3.(KSP) 


ONLY NEED 8 CHARACTERS NOT 11 


012637 


054040 






NOV 


(KSP)*.10$ 


PUT ADDRESS OF ASCII CHARS. AT 10$ 


104401 






TYPE 




TYPE OCTAL VALUE OF 22-61 T BINARY NO. 


000000 






10$: 


.WORD 


0 








.••THIS 


CODE IS 


FOR OCTAL (22-eiT) FORMAT FOR A PAR LEFT SHIFTED 6 (DF= 


010246 






15S: 


MOV 


R2.-(KSP) 


SAVE R2 ON STACK 


010346 








MOV 


R3.-(KSP) 


SAVE R3 ON STACK 


015105 








MOV 


a(R1)*,P3 


LOAD DATA WORD INTO R3 


005002 








CLR 


R2 


R2 HOLDS UPPER SIX BITS OF NUMBER 


075227 


000006 






ASHC 


#6.R2 


SHIFT VALUE LEFT 6 TIMES 


010257 


001206 






MOV 


R2.$TMP4 


HOLDS LOWER 16 BITS OF ADDRESS 


010557 


001210 






MOV 


R3.$TMP5 


HOLDS UPPER 6 BITS OF ADDRESS 


012746 


001206 






MOV 


#$TMP4.-(ICSP) 


•PUT ADDRESS OF LOWER BITS ONTO STACK 


004/57 


057024 






JSR 


PC. $0820 


•CONVERT TWO LOCS. TO AN ASCII STRING 


062716 


000003 






ADD 


#3,(KSP) 


■ONLY NEED 8 CHARACTERS NOT 11 


012657 


054110 






MOV 


(KSP)*.16$ 


■PUT ADDRESS OF ASCII CHARS. AT 16$ 


104401 








TYPE 




■TYPE OCTAL VALUE OF 22-61 T BINARY NO. 


000000 






16$: 


.WORD 


0 


•RESTORE R3 


012605 








MOV 


(XSP)*.R5 


012602 








MOV 


(KSP)*.R2 


•RESTORE R2 


005711 






11$: 


TST 


(Ri; 


•IS THERE ATJOTHER NUMBER? 


001404 








BEQ 


12$ 


;BR IF NO 


104401 


054144 






TYPE 


.14$ 


■TYPE TWO (2) SPACES 

;POINT TO NEW "DATA FORMAT" 


105720 








TST8 


(RO)* 


000707 








BR 


6$ 


;LOOP 


012601 






12$: 


M0^« 


(KSP)*.R1 


.•RESTORE RI 


012600 






13$: 


MOV 


(XSP)*.RO 


'RESTORE RO 

•"CARRIAGE RETURN" t "LINE FEED" 


104401 


001221 






TYPE 


,$CRLF 


000207 








RTS 


PC 


.•RETURN 


040 


040 


000 


14$: 


.ASCIZ 
.EVEN 


/ / 


.TWO (2) SPACES 


034160 


054220 


054250 


PFECWS: 


.WORD 


PFECEM.PFECDH.PFECDT.PFECDF 


120 


117 


127 


PF ECEM: 


.ASCIZ 


7P0WER MONITOR BIT WAS FOUND SET? 


124 


105 


123 


PF ECDH: 


.ASCIZ 
.EVEN 


7TESTN0 ERR PC 


CPUERR? 


001230 


001116 


055244 


PF ECDT: 


.WORD 


$TESTN,$ERRPC , CPSAVE .0 


000 


000 


000 


PFECDF: 


.BYTE 


0.0.0.0 
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TTY INPUT RCXJTINE 



3315 



S8TTL TTY INPiJT ROUTINE 



SEQUENCE 1U 

i 



ENABL LSB 



•SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
•ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 
•SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
•WHEN OPERATING IN TTY FLAG MODE. 





rt00777 


(WVI 7i^ 

0001 ' o 


nni 1 Lf\ 
001 ihO 


•LPkdUK : 


Lnr 


jfCuDF^ CUB 


, i 9 1 ric our 1 ~oWn oCLC L ' CU • 




AA1 11/ 

001 1 i*» 










1 

1 J» , 






1 rt<777 

\\JJf f f 


1 » / / / 
iHHOHH 








1 • 


• r r Kin nmu ' t ua i t APni lun 


U5*»300 


1 /VM 1 1 
100 1 1 1 








DDI 
Or'L 


I J* , 


ni/. wo 


\\ff HO 


1 HHOhU 






nuvo 


acTi^n -/CP) 

••l^O, \jr/ , 

<fC177.(SP) 


• ^AUP TMP ruAO 




Oner IO 


1 f f OUU 








•CTPTP^nFF TMP ACT IT 
, o 1 rt i r^yjT r 1 He Mo V i i 


nt/.7i 0 


UcCf CO 


\J\j\J\rJt 






rMP 


#7j(SP)* 
15$ 


• T ^ IT A rOMTRQI C 


Uj*»j IO 


OO 1 1 Uc 








one 


■NO RFTURN TO IJSFR 




1 0T707 
ICJr cr 


Uv 1 1 .^H 


nooool 






CANTOR #1 


■ARF UF RIMUTNfi IN AliTO-MODF'' 


nTz.70A 


UU 1 «»f O 








□cw 


IS* 


•RRANrM IF YF^ 

« Urwwn ir iCO 




1 UmmU 1 


\JjjCj 1 








trNTI G 
fV^ni 1 1.VJ # 


•FfHO THF rONTROI -G (•G) 




1 CiLLM 
1 Uh«»U 1 


Uj?c JO 




9lJ 1 own • 


TVPP 




•TYPF riRRFNT TOMTPNT^ 




U 1 Jf HO 


UW 1 r O 










•^AVF ^URFG FOR TYPFOUT 




1 UhHUc 








T VPfir 




• an TYPF~nrTAi AsriifAii disit*;) 




in^/ni 








T YPF 




•PROMPT FOR NFU SWR 




VA/jUhO 






1 T4» • 


ri R 


- ^ ^P ) 


• n FAR rOlMTFR 




VA/3UHO 








ri R 


V Or / « 


■ THF NFU ^UR 




in^777 
1 uj f f f 


1 HH JOc 




71" 


T^TR 
1 O 1 o 




;CHAR THERE? 












RPI 


7$ ; 


;IF NOT TRY AGAIN 




tiff HO 


f HH J-/0 








#*C177 (SP) 

\ Or / * W J # 


•PICK UP CHAR 




VHC ' < O 


177A00 
1 f f 






Rir 


•MAKE IT 7-flIT ASCII 




n?1 AP7 

\JC 1 OC r 










•IS IT A rONTROl -C'' 














9$ 


•RRANCH IF NOT 




1 WHHw 1 




1 




TYPP 




•YES ECHO CQNTROL-C (*C) 




fV>?7fV> 

UOc ' UD 


00000/% 






ADD 

f%UV 


ir^ <:p 

VJ # Or , 


; CLEAN UP STACK 




1 P'^7?7 


OOTIDS 


000001 

lA/Wv 1 








•RFFNABLF TTY KEYBOARD INTERRUPTS"* 


\JjHHC\J 


nninn^ 

W 1 Wj 








RNP 


8$ 


;BRANCH IF NO 




ni ?777 

\J I Cf f f 


000100 


1 HH J f H 




MOV 


#100 aiTK^ 


•ALLOW TTY KEYBOARD INTERRUPTS 




onoi ^^7 


V/J^COv 






IMP 




•CONTROL-C RESTART 






00007S 






TMP 


(SP) ,>r25 


•IS IT A CONTROL -U"* 




00100S 








RNF 


10$ 


■BRANCH IF NOT 




1 ^^Hw 1 


V/J-/CCH 






TYPF 

1 • r t 


SCNTLU 


•YES ECHO CONTROL -U (*U) 
•IGNORE PREVIOUS INF>UT 
•IFT'S TRY IT AGAIN 




0AP70A 

UOC' wU 








ADD 


iV^ SP 




VAA/r Jf 










19$ 


034454 


021627 


000015 




10$: 


CMP 


(SP),*15 ; 


;IS IT A <CR>? 


034460 


001022 








BNE 


16$ 


.-BRANCH IF NO ^ 


034462 


005766 


000004 






TST 


4(SP) 


;YES. IS IT THE^IRST CHAR? 


034466 


001403 








BEQ 


11$ 


.-BRANCH IF YES 


034470 


016677 


000002 


144442 




MOV 


2(SP),aSWR 


;SAVE NEW SWR 


034476 


062706 


000006 




11$: 


ADD 


/r6.sp 


.•CLEAR UP STACK 


034502 


104401 


001221 




14$: 


TYPE 


.$CRLF 


;ECHO <CR> AND <LF> 


034506 


123727 


001135 


000001 




cfve 


$INTAG,#1 


; RE-ENABLE TTY KBD INTERRUPTS? 


034514 


001003 








BNE 


15$ 


.•BRANCH IF NOT 


034516 


012777 


000100 


144420 




MOV 


*100,a$TKS 


;RE-ENABLE TTY KBD INTERRUPTS 


034524 


000002 






15$: 


RTI 


.•RETURN 


034526 


004737 


035602 




16$: 


JSR 


PC.$TYPEC ; 


.•ECHO CHAR 


034532 


021627 


000060 






CMP 


(SP),*60 ; 


;CHAR < 0? 


034536 


002420 








BLT 


18$ 


.BRANCH IF YES 


034540 


021627 


000067 






CMP 


(SP),*67 


;CHAR > 7? 



11/^^ HEM MG«T PRT A 
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SEOUEN( i 



03ASA6 
034552 
034556 
034560 
034562 
034564 
034566 
034572 
034576 
034600 
034604 



034606 
034610 
034616 
034622 
034624 
034632 
034640 
034646 
034650 
034654 
034656 
034662 
034666 
034672 
034674 
034676 
034704 
034706 
034714 
034716 
034724 
034726 
034734 



003015 
042726 
005766 
001403 
006316 
006316 
006316 
005266 
056616 
000667 
104401 
000720 



011646 
016666 
105777 
100375 
117766 
042766 
026627 
001013 
105777 
100375 
117746 
042716 
022627 
001366 
000750 
026627 
001744 
026627 
002407 
026627 
003003 
042766 
000002 



000060 
000002 



000002 
177776 

001220 



000004 
144322 

144316 
177600 
000004 

144270 

144264 
177600 
000021 



000004 
000004 
000004 
000040 



034736 010346 

034740 005046 

034742 012703 035214 

034746 022703 035224 

034752 101467 

034754 104411 

034756 112613 

034760 122713 000003 



000002 



000004 
000004 
000023 



000021 
000140 
000175 
000004 



BGT 
BIC 
TST 
BEQ 
ASL 
ASL 
ASL 

17$: INC 
BIS 
BR 

IBS: TYPE 
BR 

.DSABL LS6 

* ************ 

*TH1S ROUTINE 
•CALL: 

* RDCHR 

* RETURN 



IBS 

#60. (SP)* ' 

2 ISP) 

17$ 

(SP) 

(SP) 

(SP) 

2(SP) 

-2(SP), (SP) 
7$ 

.$QUES 
20$ 



BRANCH IF YES 

STRIP-OFF ASCII 

IS THIS THE FIRST CHAR 

BRANCH IF YES 

NO. SHIFT PRESENT 
CHAR OVER TO MAKE 
ROOM FOR NEW ONE. 

KEEP COUNT OF CHAR 

SET IN NEW CHAR 

GET THE NEXT ONE 

TYPE ?<CR><LF> 

SIMULATE CONTROL -U 



*************************************************** 

WILL INPUT A SINGLE CHARACTER FRCM THE TTY 



SRDCHR 
1$: 



2$: 



3$: 



4$: 
• **** 

iTHIS 
*CALL: 



MOV 
MOV 
TST8 
BPL 
MOVB 
BIC 
CMP 
6NE 
TST8 
BPL 
MOVB 
BIC 
CMP 
BNE 
BR 
CMP 
BEQ 
CMP 
BLT 
CMP 
BGT 
BIC 
RTJ 
******** 

ROUTINE 



HERE 



(SP).-(SP) 

4(SP),2(SP) 

a$TKS 

1$ 

a$TKe.4(SP) 

#*C<177>.4(SP) 

4{SP).#23 

3$ 

aSTKS 
2$ 

a$TKB,-(SP) 
#*C177,(SP) 
(SP)*,#21 
2$ 

1$ 

4(SP)«#SX0N 
1$ 

4(SP).#140 
4S 

4(SP).#175 
4S 

#40,4(SP) 



;; INPUT A SINGLE CHARACTER FROM THE TTY 
;; CHARACTER IS ON THE STACK 
;;WITH PARITY BIT STRIPPED OFF 



PUSH DOWN THE PC 

SAVE THE PS 

WAIT FOR 

A CHARACTER 

READ THE TTY 

GET RID OF JUNK IF ANY 

IS IT A CQNTROL-S? 

BRANCH IF NO 

WAIT FOR A CHARACTER 

LOOP UNTIL ITS THERE 

GET CHARACTER 

MAKE IT 7-BIT ASCII 

IS IT A CONTROL-Q? 

IF NOT DISCARD IT 

YES. RESUME 

IS IT A RANDOM XON? 

BRANCH IF YES 

IS IT UPPER CASE? , 

BRANCH IF YES 

IS IT A SPECIAL CHAR? 

BRANCH IF YES 

MAKE IT UPPER CASE 

60 BACK TO USER 



;RAN001 
.-RANOOI 



*************************************************** 



WILL INPUT A STRING FROM THE TTY 



SRDLIN: 

1$: 
2$: 



RDL IN 

RETURN HERE 

MOV R3, -(SP) 

CLR -(SP) 

MOV 4fSTTYlN,R3 

CMP mTYIN+8..R3 

BLOS 4$ 

RDCHR 

MOVB (SP)+,(R3) 

CMPB #3,(R3) 



INPUT A STRING FROM THE TTY 

ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
TERMINATOR WILL BE A BYTE OF ALL O'S 
SAVE R3 

CLEAR THE RU80UT KEY 
GET ADDRESS 
BUFFER FULL? 
BR IF YES 

GO READ ONE CHARACTER FROM THE TTY 

GET CHARACTER 

IS IT A CONTROL-C? 
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001006 








BNE 


10$ 


03^766 


104401 


001350 






TYPE 


.SCNTLC 


03^772 


005726 








TST 


(SP)* 


03477A 


012603 








MOV 


(SP) ♦.R3 


034776 


000137 


035260 






JMP 


CNTRLC 


035002 


122713 


000177 




10S: 


CMPB 


#1 77. (R3) 


035006 


001022 








briC 


5S 


035010 


005716 








TST 


(SP) 


035012 


001007 








BNE 


6S 

#'\.9$ 


0350K 


112737 


000134 


035212 




M0V8 


0-^SO?2 


104401 


035212 






TYPE 


.9$ 


035026 


012716 


\11177 






MOV 


#-1.(SP) 


035032 


005303 






6S: 


DEC 


R3 


035034 


020327 


0352K 






CMP 


R3,#$TTYIN 


035040 


103434 








BLO 


4$ 


035042 


111337 


035212 






MOVB 


(R3).9$ 


035046 


104401 


035212 






TYPE 


.9$ 


035052 


000735 








BR 


2$ 


035054 


005716 






5$: 


TST 


(SP) 


035056 


001406 








BEQ 


7$ 

*'\,9$ 


035060 


112737 


000134 


035212 




MOVB 


035066 


104401 


035212 






TYPE 


.9$ 


035072 


005016 








CLR 


(SP) 


035074 


122713 


000025 




7$: 


CMPB 


#25,vR3) 


035100 


001003 








BNE 


8S 


035102 


104401 


035224 






TYPE 


.SCNTLU 


035106 


000715 








BR 


1$ 


035110 


122713 


000022 




8S: 


CMPB 


#22. (R3) 


035114 


001011 








BNE 


3$ 


035116 


105013 








CLR8 


(R3) 


035120 


104401 


001221 






TYPE 


.SCRLF 


035124 


104401 


035214 






TYPE 


.STTYIN 
2$ 


035130 


000706 








BR 


035132 


104401 


001220 




4S: 


TYPE 


.$QUES 


035136 


000701 








BR 


IS 


035140 


111337 


035212 




3$: 


MOVB 


(R3),9$ 


035144 


104401 


035212 






TYPE 


.9$ 


035150 


^ 22723 


000015 






CMPB 


#15. (R3)* 


035154 


001274 








BNE 


2$ 


035156 


105063 


M7777 






CLR8 


-1 (fi3) 


035162 


104401 


001222 






TYPE 


.SLF 


03S166 


005726 








TST 


(SP)* 


03:. 170 


012603 








MOV 


(SP) ♦,R3 


035172 


011646 








MOV 


(SP). -(SP) 


035174 


016666 


000004 


000002 




MOV . 


t,{S?),2iS?) 


035202 


012766 


035214 


000004 




MOV 


mTYIN,4(SP) 


035210 


000002 








RTI 




035212 


000 






9$: 


.BYTE 


0 


035213 


000 








.BYTE 


0 


035214 








$TTYIN: 


.BLKB 


8. 


035224 


136 


125 


015 


$CNTLU: 


.ASCIZ 


/*U/<15><12> 


035231 


136 


107 


015 


SCNTLG: 


.ASCIZ 


/*6/<15><12> 


035236 


015 


012 


123 


$nSUR: 


.ASCIZ 


<15><12>/SWR 


035247 


040 


040 


116 


SnNEW: 


.ASCIZ 


/ NEW = / 



SEQUENCE 



BRANCH IF NO 

TYPE A CONTROL-C (*C) 

CLEAN RUBOUT KEY OFF OF THE STACK 

RESTORE R3 

GOTO CONTROL-C RESTART 
IS IT A RUBOUT 
BR IF NO 

IS THIS THE FIRST RUBOLIT' 
BR IF NO 

TYPE A BACK SLASH 

SET THE RUBOUT KEY 
BACKUP BY ONE 
;STACK EMPTY? 
'BR IF YES 

•SETUP TO TYPEOUT THE DELETED CHAR. 
;G0 TYPE 

;G0 READ ANOTHER CHAR. 
;RUB0UT KEY SET? 
;BR IF NO 

:TYPE A BACK SLASH 

: CLEAR THE RUBOUT KEY 
;IS CHARACTER A CTRL U? 
;BR IF NO 

rTYPE A CONTROL 'V 

;60 START OVER 

:IS CHARACTER A "*R"? 

;BRANCH IF NO 

; CLEAR THE CHARACTER 

;TYPE A 'tR" ft "Lf" 

;TYP£ THE INPUT STRING 

;G0 PICKUP ANOTHER CHACTER 

jTYPE A •?• 

; CLEAR THE BUFFER AND LOOP 
;ECH0 THE CHARACTER 

; CHECK FOR RETURN 

;L00P IF NOT RETURN 

; CLEAR RETURN (THE 15) 

;TYPE A LINE FEED 

; CLEAN RUBOUT KEY FROM THE STACK 

'RESTORE R3 

;AOJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 

; RE TURN 

rSTORAGE FOR ASCII fHAR. TO TYPE 
* TERMINATOR 

•RESERVE 8 BYTES FOR TTY I»^T 
: CONTROL 'V 
; CONTROL 
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3317 

3318 035260 

3319 035266 

3320 035272 

3321 035276 

3322 035304 

3323 035310 

3324 035312 

3325 035316 

3326 035322 

3327 035324 
3323 035326 

3329 035332 

3330 035354 

3331 035337 

3332 035367 



013737 
005237 
104401 
113737 
013746 
104402 
104401 
013746 
104405 
104407 
000137 
000000 
040 
112 
000 



001232 
001210 
035337 
001102 
035332 

035334 
001210 



032542 



040 
125 
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SEQUENCE 



001210 



035332 



.S8TTL 
CNTRLC : 



000 
115 



1$: 
2$: 
CMSG: 



CONTROL 
MOV 

INC 
TYPE 

novB 

MOV 

TYPOC 

TYPE 

MOV 

TYPDS 

GTSUR 

JMP 

.WORD 

.ASCI2 

.ASCII 

.BYTE 



-C SERVICING ROUTINE 



$PASS,$TMP5 
$TMP5 
.CMSG 
iTSTf#1,l$ 
IS.-(SP) 

$TMP5.-(SP) 



$E0P*2 

0 

/ / 



GET THE VALUE OF '"IPASS" 
FORM CURRENT PASS # 
TYPE THE TEST STOPS HERE 
SAVE TEST NIMBER 
SAVE 1$ FO TYPEOUT 



SAVE $TMP5 FOR TYPEOUT 

TYPE ASCII DECIMAL WITH SIGN 

ASK FOR NEW SUR VALUE 

JUMP TO END OF PASS + 2 

TEST # BUFFER 

2 SPACES t STOP MESSAGE 



/JUMPING TO END OF PASS/<15><12> 
0 



I 



flCKT/^O «E« W PRT A 

^rP€ ROUTINE 
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SSTTL TYPE ROUTINE 



B 10 
91 



SEQUENCE 118 



•ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BYTE. 
•THE ROUTINE WILL INSERT A Nl/BER OF NULL CHARACTERS AFTER A LINE FEED, 



•N0TE1 
•NOTE? 
•N0TE3 



•CALL: 
•1) USING A 

• TYPE 
•OR 

• TYPE 

• ME S ADR 



SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 



TRAP I.MSTRUCTION 
.MESADR 



;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



035370 


:05737 


001157 




STYPE: 


TSTB 


$TPFL6 


;IS THERE A TERMINAL? 


035374 


100002 








BPL 


1$ 


;Bfi IF YES 


035376 


000000 








HALT 




;HALT HERE IF NO TERMINAL 


035400 


000430 








BR 


3$ ; 


.•LEAVE 


035402 


010046 






1$: 


MOV 


R0,-(SP) 


.•SAVE RO 


035404 


017600 


00000? 






MOV 


a2(SP).R0 


;GET ADDRESS OF ASCIZ STRING 


035410 


122737 


000001 


001244 




CMPB 


#APTENV,$ENV 


.•RUNNING IN APT MODE 


035416 


001011 








BNE 


62$ 


;NO.GO CHECK FOR APT CONSOLE 


035420 


132737 


000100 


001245 




BITB 


#APTSPOOL.$ENVM ; 


.SPOOL MESSAGE TO APT 


035426 


001405 








BEQ 


62$ 


.-NO.GO CHECK FOR CONSOLE 


035430 


010037 


035440 






MOV 


R0,61$ 


.•SETUP MESSAGE ADDRESS FOR APT 


035454 


004737 


035742 






JSR 


PC.$ATY3 


.•SPOOL MESSAGE TO APT 


035440 


000000 






61$: 


.WORD 


0 


.•MESSAGE ADDRESS 


035442 


132737 


000040 


001245 


62$: 


BITB 


#APTCSUP,$ENVM ; 


;APT CONSOLE SUPPRESSED 


035450 


001003 








BNE 


60$ 


; YES. SKIP TYPE OUT 


035452 


112046 






2$: 


M0V8 


(RO)*,-<SP) 


.PUSH CHARACTER TO BE TYPED ONTO STACK 
;BR IF IT ISN'T THE TERMINATOR 


035454 


001005 








BNE 


4$ 


035456 


005726 








TST 


(SP)* 


;IF TERMINATOR POP IT OFF THE STACK 


035460 


012600 






60$: 


MOV 


(SP)*,RO 


.•RESTORE RO 


035462 


062716 


000002 




3$: 


ADD 


#2.(SP) 


.•ADJUST RETURN PC 


035466 


000002 








RTI 




.•RETURN 


035470 


122716 


000011 




4$: 


CMPB 


#HT,(SP) ; 


.'BRANCH IF <HT> 


035474 


001430 








BEQ 


8$ 




035476 


122716 


000200 






CMPB 


#CRLF.(SP) 


.-BRANCH IF NOT <CRLF> 


035502 


001006 








BNE 


5$ 




035504 


005726 








TST 


(SP)* 


.-POP <CR><LF> EQUIV 


035506 


104401 








TYPE 


• 


.•TYPE A CR AND LF 


035510 


001221 








$CRLF 






035512 


105037 


035730 






CLR8 


$CHARCNT 


.•CLEAR CHARACTER COUNT 


035516 


000755 








BR 


2$ 


;6ET NEXT CHARACTER 


035520 


004737 


035602 




5$: 


JSR 


PC,$TYPEC 


;60 TYPE THIS CHARACTER 


035524 


123726 


001156 




6$: 


CMPB 


$FILLC,(SP)* 


;IS IT TIME FOR FILLER CHARS.? 


035530 


001350 








BNE 


2$ 


.•IF NO 60 GET NEXT CHAR. 


035532 


013746 


001154 






MOV 


$NULL,-<SP) 


.GET » OF FILLER CHARS. NEEDED 














.AND THE NULL CHAR. 


035536 


105366 


000001 




7$: 


DECS 


1 (SP) ; 


.•DOES A NULL NEED TO BE TYPED? 


035542 


002770 








BLT 


6$ 


;8R IF NO— GO POP THE NULL OFF OF STACK 


03'?544 


004737 


035602 






JSR 


PC,$TYPEC 


;G0 TYPE A NULL 


035550 


105337 


035730 






DECB 


$CHARCNT 


;D0 NOT COUNT AS A COUNT 


035554 


000770 








BR 


7$ 


.•LOOP 










.HORIZONTAL TAB 


PROCESSOR 
,(SP) 




035556 


112716 


000040 




8$: 


M0V8 


.•REPLACE TAB WITH SPACE 
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15R 






00''>007 


075770 








KAJ \ Jf C 








RNF 


\JjJJfO 


005 7?6 








T5T 




0007P4 








BR 
















105777 

1 V J f f f 


147776 






















ni 7746 


14777? 






MOV 




04P716 


177600 

1 f f UW 


1 








1??716 

1 CCf 1 u 


0000?7 

vVAA/C J 






CMPB 




00101? 








BNE 










101ft- 






105777 

\\j ji f f 


14331? 

1 *VJ-J 1 c 






TSTB 




100775 








BPL 




1 1 771 6 


143306 










04?716 


177600 

Iff O W 






BIC 

Oil \> 




1??716 


0000? 1 






CMPB 




001366 








BNE 










102$- 






005 7?6 








TST 

1 w I 










10ft- 






105777 


143270 






TSTB 




100375 








BPL 


035662 


1P6627 


000002 


000021 




CMPB 


035670 


001420 








BEO 


03567? 


116677 


000002 


143252 




MOVB 


035700 


1??766 


000015 


000002 

WVWb 




CMPB 


035706 


001003 








BNE 


035710 


105037 


035730 






CLRB 


0357U 


000406 








BR 


035716 


122766 


000012 


000002 


1J: 


CMPB 


035724 


001402 








BEO 


035726 


105227 








INCB 


035730 


000000 






$CHARCNT:.UOI 


035732 


000207 






STYPEX: 


RTS 
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PC.JTYPEC 

#7,SCHARCNT 

9S 

(SP)* 
2ft 

aftTKS 
10$ 

ajT»(fl,-(SP) 

#1 77600, (SP) 

#$X0fF,(SP) 

102ft 

aftTKS 
101ft 

8ftTKB-(SP) 
*1 77600. (SP) 

101ft 

(SP)* 

aftTPs 

10ft 

2(SP).moN 

ftTYPEX 

2(SP),a$TPB 

MCR.2(SP) 

1$ 

ftCHARCNT 

ftTYPEX 

irLF,2(SP) 

ftTYPEX 

(PC)* 

0 

PC 



;;TYPE A SPACE 
.-.BRANCH IF NOT AT 
* * TAB STOP 

;;POP SPACE OFF STACK 
;;GET NEXT CHARACTER 

;;CHAR IN KYBO BUFFER? 
;;BR IF NOT 
;;GET CHAR 

;; STRIP EXTRANEOUS BITS 
:;UAS CHAR XOFF 
;;8R IF NOT 

::UAIT FOR CHAR 

;;GET CHAR 
; .-STRIP IT 
.-.-WAS IT XON? 
::BR IF NOT 

;;FIX STACK 

;;UAIT UNTIL PRINTER IS READY 

::IS CHARACTER A RANDOM XON? 
' -BRANCH IF YES 

;;LOAO CHAR TO BE TYPED INTO DATA REG. 
;;IS CHARACTER A CARRIAGE RETURN? 
.-.BRANCH IF NO 

;; YES— CLEAR CHARACTER COUNT 
;;EXIT 

;;IS CHARACTER A LINE FEED? 
; .-BRANCH IF YES 
;; COUNT THE CHARACTER 
.-.'CHARACTER COUNT STORAGE 



.MJDOOI 
;MJD001 
;MJD001 
; MJDOOI 
; MJDOOI 
;MJD001 
;MJD001 
;MJD001 
;MJD001 
.-MJDOOI 
;MJD001 
;MJD001 
;MJD001 
;MJD001 
;MJD001 
; MJDOOI 

.MJDOOI 
.RANOOI 
.RANOOI 
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.S8TTL APT CON 



055734 


1 1?7'?7 


000001 


036200 


$ATY1 : 


M0V8 


035742 


1 1P737 


000001 


0361 76 


iATY3- 


M0V8 


035750 










BR 


0^575? 


1 1 2737 


000001 


036200 


SATY4: 


MOVB 


035760 








SATYC: 




035760 


010046 
010146 








MOV 


03576? 








MOV 


035764 


105737 


036176 






TSTB 


035770 
035772 
036000 


001450 








6E0 


1 22737 


000001 


001244 




CMPB 


001031 








BNE 


036002 


132737 


000100 

WW 1 w 


001245 




BITB 


036010 


001425 
/ 01 7600 








BEO 


036012 


000004 

w vw 






MOV 


036016 


062766 


000002 

wv w t 


000004 

V w w~ 




ADD 


036024 


005737 


001224 




1$: 


TST 


036030 


001375 








BNE 


036032 


010037 


001 240 

W 1 t ~ w 






MOV 


036036 


105720 






2S: 


TSTB 


036040 


001376 








BNE 


036042 


163700 


001240 






SUB 


036046 


006200 








ASR 


036050 


010037 


001242 






MOV 


036054 


012737 


000004 


001 224 




MOV 


0^6062 


000413 








BR 


036064 


017637 


000004 


0361 1 0 


3$: 


MOV 


036072 


062766 


000002 


000004 




ADD 


036100 


013746 


1 77776 






MOV 


036104 


004737 


035370 






JSR 


036110 


000000 

www 






4S: 


.WORD 


036112 








5S: 




036112 


105737 


036200 




10S: 


TSTB 


036116 


001416 








BEO 


036120 


005737 


001244 






TST 


036124 


001413 








BEQ 


036126 


005737 


001224 




11$: 


TST 


036132 


001375 








BNE 


036134 


01 7637 


000004 


001226 




MOV 


036142 


062766 


000002 

W WW t 


000004 




ADD 


036150 


005237 


001224 






INC 


036154 


105037 


036200 




12$: 


CLRB 


036160 


105037 


036177 






CLRB 


036164 


105037 


036176 






CLRB 


036170 


012601 








MOV 


036172 


012600 








MOV 


036174 


000207 








RTS 


036176 


000 






$MFLG: 


.BYTE 


036177 


000 






$LFL6: 


.BYTE 


036200 


000 






$FFL6: 


.BYTE 
.EVEN 



000200 
000001 
000100 
000040 



APTSIZE=200 
APTENV=001 
APT SPOOL "100 
»APTCSl^-040 
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CATIONS ROUTINE 



#1,$FFLG ;;T0 REPORT FATAL ERROR 

#1,$MFL6 ;;T0 TYPE A MESSAGE 
$ATYC 

#1.$FFLG ;;T0 ONLY REPORT FATAL ERROR 

RO.-(SP) ;;PUSH RO ON STACK 

RI.-(SP) ;;PUSH R1 ON STACK 

$«FLG ; .-SHOULD TYPE A MESSAGE? 

5$ ;;IF NOT: BR 

#APTENV.$ENV ; .-OPERATING UNDER APT? 

3$ ;;IF NOT: BR 

*APTSPOOL.$ENVM .-.'SHOULD SPOOL MESSAGES? 

3$ * * IF NOT : BR 

a4(SP}.R0 ;:GET MESSAGE ADDR. 

*2.4(SP) ;;8lf»> RETURN ADDR. 

$«SGTYPE ;;SEE IF DONE W/ LAST XMISSION 

1$ ;;IF NOT: WAIT 

RO.$«SGAD .-.-PUT ADDR IN MAILBOX 

(R0)+ .-.-FIND END OF MESSAGE 

2$ 

$MS6AD.R0 ;;SUB START OF MESSAGE 

RO ;;GET MESSAGE LN6TH IN WORDS 

RO.$«SGLGT ;;PUT LENGTH IN MAILBOX 

#4.$«SGTYPE .-.-TELL APT TO TAKE MSG. 

5$ 

a4(SP).4$ .-.-PUT MSG ADDR IN JSR LINKAGE 
#2,4 (SP) ;;Bl*»» RETURN ADDRESS 

1 77776, -(SP) ;;PUSH 177776 ON STACK 

PC.$TYPE .-.-CALL TYPE MACRO 
0 

$FF LG ;; SHOULD REPORT FATAL ERROR? 

12$ ;;IF NOT: BR 

$ENV .-.-RUNNING UNDER APT? 

12$ ;;IF NOT: BR 

$«SGTYPE .-.-FINISHED LAST MESSAGE? 

11$ .-.-IF NOT: WAIT 

a4(SP),$FATAL ;;GET ERROR # 

#2.4 (SP) ;;8U1P RETURN ADDR. 

$MSGTYPE ;;TELL APT TO TAKE ERROR 

$FFLG .-.-CLEAR FATAL FLAG 

$LFLG .-.-CLEAR LOG FLAG 

SMFLG ;; CLEAR MESSAGE FLAG 

(SP)-^. R1 .-.-POP STACK INTO R1 

(SP) +,R0 ;;POP STACK INTO RO 

PC .-.-RETURN 

0 ;;MESSG. FLAG 

0 ;;LOG FLAG 

0 ;; FATAL FLAG 
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SEQUENCE 



3337 











S8TTL 


BINARY 


TO ASCII AND TYPE 


ROUTINE 










•*THIS 


ROUTINE 


IS USED TO CHANGE 


A 16-eiT BINARY NUMBER TO A 10-61 T 










■•8m^RY-ASCII 


NUMBER AND TYPE IT. 










•CALL: 
















• 


MOV 


NlfBER,-(SP) 


.-NUMBER TO BE TYPED 










* 


TYPBN 




.•TYPE IT 


056202 


010K6 




STYPSN: 


MOV 


R1,-(SP) 
6(SP),R1 


.-SAVE R1 ON THE STACK 


03620^. 


016601 


000006 






MOV 


.GET THE INPUT NLfBcR 


036210 


000261 








SEC 




.SET C SO CAN KEEP TRACK OF THE NUMBER 


036212 


1 12737 


000060 


036254 1$: 


M0V8 


* 0,$8IN 


;SET CHARACTER TO AN ASCII u . 


036220 


006101 








HUL 


D1 

n 1 , 


• r;PT Tuic niT 


036222 


00H06 








BEQ 


2$ 


;DONE? 


03622s 


105537 


03625s 






ADCB 


SBIN 


;NO~SET THE CHARACTER EQUAL TO THIS BIT 


036230 


10*»*»01 


05625s 






TYPE 


.S8IN 


;60 TYPE THIS BIT 

.•CLEAR "C" SO CAN KEEP TRACK OF BITS 












CLC 




036236 


000765 








BR 


IS ; 


;60 DO THE NEXT BIT 


0362A0 


012601 




2$: 


MOV 


(SP)+.R1 


.POP THE STACK INTO R1 


0362A2 


016666 


000002 


000004 




MOV 


2(SP>.4(SP) 


.•ADJUST THE STACK 


036250 


012616 








MOV 


(SP)+,(SP) 




036252 


000002 








RTI 




.•RETURN TO USER 


03625A 


000 


000 


$eiN: 


.BYTE 


0.0 ; 


.•STORAGE FOR ASCII CHAR. AND TERMINATOR 
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SEQUENCE 



3339 



S8TTI BIf*ARY TO OCTAL (ASCII > AND TYPE 



•THIS ROUTINE IS USED TO CHANGE A 16-eiT BINARY NUMBER TO A 6-DIGIT 
•OCTAL (ASCII) l^fBER AND TYPE IT. 

•STYPOS ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 

•CALL! 
* 

* 
* 



MOV 

TYPOS 
.BYTE 
.BYTE 



NLII.-(SP) 

N 
M 



NUMBER TO BE TYPED 
CALL FOR TYPEOUT 

N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
M=1 OR 0 

;;1=TYPE LEADING ZEROS 
;;0=SUPPRESS LEADING ZEROS 



•STYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•STYPOS OR STYPOC 
•CALL: 

• MOV NIJI.-(SP) 

• TYPON 
* 

•STYPOC ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 

•CALL: 



rNLMBER TO BE TYPED 
;CALL FOR TYPEOUT 











- It 






•MMRPR TO RF TYPFD 










■ 1^ 






•CALL FOR TYPEOUT 




\J 1 f OHO 








MDV 


1 (SP) SOFILL 


■PICKUP THE MODE 


KJjOCOC 


1 ^/^'^7 

1 1 OO^ r 


www 1 






MO\/R 


•LOAD ZERO FILL SWITCH 




1 1 CQJ f 


036S03 






MOVB 

1 nJ WO 


(SP)* S0M0DF-«-1 


•NLWBER OF DIGITS TO TYPE 


nVi?74 




00000? 






ADD 




•ADJUST RETURN ADDRESS 


\JjOj\AJ 


1 1 ^"^7 

1 let -Ji 

112737 








Dp 


STYPON 




\JjOJ\JC 










#1. SOFILL 


•SET THE ZERO FILL SWITCH 


036310 


000006 


036503 




MOVB 


#6,S0M0DE+1 


;SET FOR SIX(6) DIGITS 


036316 


112737 


000005 


036500 


STYPON: 


MOVE 


*5,S0CNT 


.-SET THE ITERATION COUNT 


036324 


010346 








MOV 


R3.-(SP) 


.SAVE R3 


036326 


010446 








MOV 


R4. -(SP) 


.-SAVE R4 


036330 


010546 








MOV 


R5.-(SP) 


.•SAVE R5 


036332 


113704 


036503 






MOVB 


S0f10DE-H,R4 


.-GET THE NLMBER OF DIGITS TO 


036336 


005404 








NEG 


R4 




036340 


062704 


000006 






ADD 


#6.R4 


.SUBTRACT IT FOR MAX. ALLOWE 


036344 


110437 


036502 






MOVB 


R4,S0f10DE 


.SAVE IT FOR USE 


036350 


113704 


036501 






MOVB 


$0FILL.R4 


;GET THE ZERO FILL SWITCH 


036354 


016605 


000012 






MOV 


12(SP),R5 


.•PICKUP THE INPUT NUMBER 


036360 


005003 








CLR 


R3 


.•CLEAR THE OUTPUT WORD 
.•ROTATE MSB INTO "C" 


036362 


006105 






IS: 


ROL 


R5 


036364 


000404 








BR 


3S 


;G0 DO MSB 


036366 


006105 






2S: 


ROL 


R5 


.•FORM THIS DIGIT 


036370 


006105 








ROL 


R5 




036372 


006105 








ROL 


R5 




036374 


010503 








MOV 


R5,R3 




036376 


006103 






3S: 


ROL 


R3 


;GET LSS OF THIS DIGIT 


036400 


105337 


036502 






DECS 


SOnODE 


.•TYPE THIS DIGIT? 


036404 


100016 








BPL 


7S 


;8R IF NO 


036406 


042703 


1 77770 






BIC 


*177770.R3 


.•GET RID OF JUNK 


036412 


001002 








BNE 


4S 


;TEST FOR 0 


036414 


005704 








TST 


R4 


.SUPPRESS THIS 0? 


036416 


001403 








BEQ 


5S 


;BR IF YES 


036420 


005204 






AS: 


INC 


R4 


; DON'T SUPPRESS ANYMORE O'S 


036422 


052703 


000060 






BIS 


#*0,R3 
,R3 


.•MAKE THIS DIGIT ASCII 


036426 


052703 


000040 




5S: 


BIS 


.-MAKE ASCII IF NOT ALREADY 
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b:\ary to octal (ascid and type 



036432 


110337 


036476 


MOVE 


R3 , 8$ 


.save for typing 


036456 


104401 


036476 


TYPE 


,8$ 


;60 TYPE THIS DIGIT 


036442 


105337 
003347 


036500 7$: 


DECB 


SOCNT 


; COUNT BY 1 


036446 




BGT 


; 


.88 Ir nURc TO DO 


036450 


002402 




BLT 


o> ; 


;8« Ir DONc 


036452 


005204 




INC 


Rh ; 


. INoURc LA5I DibIT 15N 1 A BLANK 


036454 


000744 




Bfi 


2S 


m r\f\ TUC 1 ACT l\f/*fT 

;G0 DO THc LAST DIGIT 


036456 


012605 


6S: 


MOV 


(SPM,R5 ; 


.•RESTORE R5 


036460 


01 2604 




MOV 


(SP)*,R4 ; 


.•RESTORE R4 


036462 


/\4 '%J' 

012603 




MOV 


(SP>*<,R3 ; 


;Rc5T0Kc 


036464 


016666 


000002 000004 


MOV 


2{SP^,4(SPJ ; 


;ScT THE STACK FOR RETURNING 


U56*»rt 


U IcO 10 




HUV 


V On / ^ # V Or ' 




036474 


000002 




RTI 




.'RETURN 


036476 


000 


8$: 


.BYTE 


0 ; 


.•STORAGE FOR ASCII DIGIT 


036477 


000 




.BYTE 


0 


.•TERMINATOR FOR TYPE ROUTINE 


036500 


000 


SOCNT: 


.BYTE 


0 


.•OCTAL DIGIT COUNTER 


036501 


000 


SOFILL: 


.BYTE 


0 


;2ER0 FILL SWITCH 


036S02 


000000 


lOMODE : 


.WORD 


0 


.•NUMBER OF DIGITS TO TYPE 



H 10 
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CONVERT BIMARY TO DECIMAL AND TYPE ROUTINE 

35A1 .S8TTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

•iTHlS ROUTINE IS USED TO CHANGE A 16-6IT BINARY NUMBER TO A 5-DIGIT 
:*SIGNED DECIMAL (ASCII) ^AJMBER AND TYPE IT. DEPENDING ON WHETHER THE 
.••NlfBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
.••BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
.••REPLACED WITH SPACES. 
.••CALL: 











• 


MOV 


NUM.-(SP) 


;PUI THt BINARY NUVcN ON IHt STACK 










• 


TYPD5 




• /■A TA TUC DAilTfUC 

;G0 TO THc ROUrjNc 


056S04 








Jl YPDS : 








036504 


010046 








MOV 




• Dl ICLI DA AlU CTATV 


056506 


A1 A1 y ^ 

010146 








MAI/ 

MOV 




• OIICLI Dl AJU CTArv 


AT^ CIA 

056510 


A1 A^/ ^ 

010246 








MAI/ 

MOV 


'DIlCU DO AAJ CTATV 


AT^ CI "5 

056512 


A1 AT/ ^ 

010546 








MAV/ 

nuv 




■ Diicu d7 ryu ctai ^ 
,r\jon Kj UN 


A7iLC 1 ✓ 
(J56D 1*» 


A1 AC/ A 

01 05ho 








MAW 

nuv 




.piiCU DC CTATIf 


AT^ C 1 ^ 

0365 16 


A1 "57/ ^ 
01 Cl'*t 








MA\y 

nuv 


«ononn ./cD^ 


•CCT QI Akl^ CUTTru AKin ClftlM 




A1 iLiLAC 

016603 


AAAAOA 
0000^0 






MAW 
HUV 




• ^PT TUP IKIPIIT imiNRPD 


0565<:6 


1 A/V%A/ 

100004 








DDI 


1 C 


• QD TP TKIDIIT TC DTIC 


056D5U 


00j40D 








Ntu 


n J , 


• MArP TUP QTMADV UIMnPD POC 




1 1^/^66 


\J'J\>V J J 


AAAAA 1 

UUUUU 1 




MTIWQ 

nuvtj 


— 1 / CD) 


■MAk'P TUP AQflT M MQPD hiFd 


U3oj*»U 


AA^fWVl 

OUjOUU 






1 C • 




OO 

nU . 


• 7PDn TUP rrHuCTAJuTC TMnpy 




A1 07A7 

01 <:/'05 


03o/^c0 






Mnw 
nuv 


it* *■ 

If , V n J * , 


• CPTIIP TUP n ITPt IT PDIIUTPD 
. 1 U» 1 nr UU 1 rU 1 rTJiNICW 


056 jhG 




UUUU*»U 






MTIWQ 


• CPT TUP P TDCT rUAOArTPO TO A Dl Aklk 




nA^/v\o 






ot . 




R2 


• ri PAD TUP arts mmbpd 


A1XCC/ 


A1 iL/VM 

016001 


050/^10 






nuv 


«U lOL \nU^ .K 1 , 


• /tCT TUP rnftlCTAMT 


U5030U 


160105 






7C • 

j« : 


CI n 


D1 DC 


• priDM Tuic nrn nifirr 


U5o)6£ 


AAO/AT 

00c4U^ 








Ql T 




• QD r F nmuP 


U56)OH 


AACOAO 

0U)£0£ 








f Mr 


D9 


• TurDPACP TUP nrn nifiTT nv 1 


U5o5o6 










DD 
on 


J» 




UxjfV 


UoU IUj 






LX. • 


Ann 


01 DC 


• Ann QAfr tup rrvtiCTAMT 


ATAC70 


OOj'Oc 








TCT 


DO 


• ruprr IP Qrn ni<;iT-fl 




001 UOt 








QHlC 


<:< 

J* • 


■ F Ai 1 Tuoni inu TP n 




lUjf 10 








TCTD 
1 O 1 O 


/ CD> • 




U566UU 










QMI 


7« 

' * » 


• >3D TP VPC 
.on Jr ICO 


U566UC 


106516 






• 




^ CD\ 


■Mcn? 


U566ys 


103005 








orr 


o» « 


•DD TP un 

,t3t\ J r NU 


U566U6 


1 1 6665 


AAAAA1 

OUUOU 1 


1 77777 
\ I ( I 1 1 




Mnv/Q 

nuvo 


1 ( CD ) —1 /D7) 


•VPC— —CPT TUP Cirau 
. TCi oc 1 1 nc OjoN 


U5661*» 


AC07nO 


uuuuou 




6* : 


Q T C 


M'n DO 
M ' DO 


• MAk'P TUP nrn nif^iT acttt 

.rln^C 1 nc OK.V l/JUJI A3LJJ 




O<v07nD 

Ojcr Uc 


uuuu*»u 




7* • 


QIC 


• MAVP IT A CPATP IP lUDT AI DPAnV A niCTT 
./^r^^C J 1 M OrMLC Jr nu 1 nLrtCML/T n L/JUJ 1 


U500CH 


1 1 no5T 
1 10£^5 








MAl/O 

nuvo 


DO /D7)4. • 


• DIIT TUrC rUADArTPD IM TUP miTDtlT QllfFPD 


U5oocO 


U03r 








TCT 


1 on > A • 




036630 




000010 






CMP 


RO >yiO 


■CHECK THE TABLE INDEX 


036634 


002746 








BLT 


2$' ; 


;60 DO THE NEXT DIGIT 


036636 


003002 








BGT 


8$ 


;G0 TO EXIT 


0366A0 


010502 








MOV 


R5.R2 


;GET THE LSD 


036642 


000764 








BR 


6$ 


;60 CHANGE TO ASCII 


036644 


105726 






8S: 


TSTB 


(SP)* 


;WAS THE LSD THE FIRST NON-ZERO? 


036646 


100003 








BPL 


9$ 


'BR IF NO 


036650 


116663 


U7777 


}77776 




M0V8 


-1(SP),-2(R3) 


•VES— SET THE SIGN FOR TYPING 


036656 


105013 






9$: 


CLR8 


(R3) 


;SET THE TERMINATOR 


036660 


012605 








MOV 


(SP)+.R5 


.-POP STACK INTO R5 


036662 


012603 








MOV 


(SP) +.R3 


;POP STACK INTO R3 ^ 


036664 


012602 








MOV 


(SP)+.R2 


;POP STACK INTO R2 


036666 


012601 








MOV 


(SP) ♦.RI 


.POP STACK INTO RI 


036670 


012600 








MOV 


(SP) ♦.RO 


.POP STACK INTO RO 


036672 


104401 


036720 






TYPE 


.SDBLK 


.NOW TYPE THE NUMBER 



CKKTA80 
CCJNVtRT 



11 /AA ME« 
BINARY TO 



036676 
036 7(K 
036706 
036710 
036712 
0367K 
036716 
036720 



MGWT PRT A 
DECIMAL AND 



MACRO Ml 113 
TYPE ROUTINE 



23-APft-81 13; 32 PAGE 
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95-1 



016666 
012616 
000002 
023A20 
001750 
OOOUA 
000012 



000002 000004 



SDT8L: 



SOBLK: 



MOV 
MOV 
RTI 

10000. 

1000. 

100. 

10. 

.BLKW 



2(Sft).A(SP) 
»T*,(SP) 



(SP 



.ADJUST THE STACK 
.-RETURN TO USER 



SEQUENCE 



CKHTABO 11/44 P1E« MGMT PRT A MACRO H1113 
SAVE AND RESTORE R0-R5 RCXJTINES 



23-APR-81 13:32 



J lO 
PAGE 96 



SEQUENCE 126 



5543 



036730 
036730 
036732 
03673A 
036736 
036740 
036742 
036744 
036750 
036754 
036760 
036764 



036766 
036766 
036772 
036776 
037002 
037006 
037010 
037012 
037014 
037016 
037020 
037022 



010046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 
016646 
016646 
000002 



012666 
012666 
012666 
012666 
012605 
012604 
012603 
012602 
012601 
012600 
000002 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



S8TTL SAVE AND RESTORE R0-R5 ROUTINES 



♦SAVE R0-R5 
♦CALL: 

* SAVREG 

♦UPON RETURN FROM SSAVREG THE 



*T0P (+16) 

• *2 (+18) 

• +4 R5 

• +6 R4 

• +8 R3 

• ♦10 R2 

**12 R1 

• ♦14 RO 

SSAVREG: 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 

•RESTORE R0-R5 
•CALL: 

• RESREG 
SRESREG: 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTI 



STACK WILL LOOK LIKE. 



RO, -(SP) 
Rl, -(SP) 
R2.-(SP) 
R3.-(SP) 
R4. -(SP) 
R5, -(SP) 
22(SP), -(SP) 
22(SP) .-(.SP) 
22(SP) .-(.SP) 
22(SP).-(SP) 



ISP)*.22(SP) 

(SP)*.22(SP) 

(SP)*,22(SP) 

(SP)*,22(SP) 

(SP)+,R5 

(SP)^,R4 

(SP)+,R3 

(SP)^.R2 

(SP)^, Rl 

(SP)+,RO 



PUSH 
PUSH 
PUSH 
PL'SH 
PUSH 
PUSH 
SAVE 
SAVE 
SAVE 
SAVE 



RO ON 
Rl ON 
R2 ON 
R3 ON 
R4 ON 
R5 ON 
PS OF 
PC OF 
PS OF 
PC OF 



STACK 

STACK 

STACK 

STACK 

STACK 

STACK 

MAIN FLOW 

MAIN FLOW 

CALL 

CALL 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOW 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RO 



CKKTA80 n/44 
DOUBLE LENGTH 

3545 



MEM WGMT PRT A 
BINARY TO OCTAL 



«ACRO Ml 113 
ASCII CONVERT 



23-APR-81 
ROUTINE 



13:32 PAGE 



K 10 
97 



SEQUENCE 1?7 



S8TTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 

iTHIS ROUTINE WILL CONVERT A 32-81 T l#4SIGNP0 BINARY NUMBER TO AN 
^UNSIGNED OCTAL ASCIZ NUMBER. 









.••CALL 
















MOV 


#PNTR,-(SP) 


.•POINTER TO LOW WORD OF BINARY NUMBER 








• » 


JSR 


PC.»r$DB20 


;CALL THE ROUTINE 








• » 


RETURN 


;THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON 


037024 


104413 




$D820: 


SAVRFG 




;SAVE ALL REGISTERS 


037026 


016601 


000002 




MOV 


2(SP),R1 ; 


.•PICKUP THE POINTER TO LOW WORD 


037032 


012705 


037143 




MOV 


#$OCTVL*13.,R5 ; 


.•POINTER TO DATA TABLE 


037036 


012704 


000014 




MOV 


#12..R4 


;D0 ELEVEN CHARACTERS 


037042 


012703 


1 77770 




MOV 


**C7.R3 


.•MASK 


037046 


012100 






MOV 


(R1)*,R0 


.•LOWER WORD 


037050 


012101 






MOV 


(R1)*,R1 


;HIGH WORD 


037052 


005002 






CLR 


R2 


; TERMINATOR 


037054 


110245 




1$: 


M0V8 


R2,-(R5) 


;PUT CHARACTER IN DATA TABLE 


037056 


010002 






MOV 


R0,R2 


;GET THIS DIGIT 


037060 


005304 






DEC 


R4 


.•COUNT THIS CHARACTER 


037062 


003007 






BGT 


3$ 


;8R IF NOT THE LAST DIGIT 


037064 


001405 






BEO 


2S 


;8R IF IT IS THE LAST DIGIT 


037066 


005205 






INC 


R5 


;ALL DIGITS DONE-ADJUST POINTER FOR FIRST 


037070 


010566 


000002 




MOV 


R5,2(SP) 


;ASCIZ CHAR. & PUT IT ON THE STACK 


037074 


104414 






RESREG 




.•RESTORE ALL REGISTERS 


037076 


000207 






R^S 


PC ; 


.•RETURN TO USER 


037100 


006203 




2>: 


ASR 


Rj ; 


.rOSITION THE MASK FOR THc LAST DJoJi 


037102 


006001 




3$: 


ROR 


R1 


.•POSITION THE BINARY NUMBER FOR 


037104 


006000 






ROR 


RO 


THE NEXT OCTAL DIGIT 


037106 


006001 






ROR 


R1 




037110 


006000 






ROR 


RO 




037112 


006001 






ROR 


R1 




037114 


006000 






ROR 


RO 




037116 


040302 






BIC 


R3.R2 


;MASK OUT ALL JUNK 


037120 


062702 


000060 




ADD 


#'0.R2 


.•MAKE THIS CHAR. ASCII 


037124 


000753 






BR 


1$ 


.•GO PUT IT IN THE DATA TABLE 


037126 






SOCTVL: 


.8L<8 


14. ; 


.RESERVE DATA TABLE 



ZKKJMBO n/«4 HE« WGHT PRT A 
TRAP DECODER 

35A7 



nACRO Mil 13 23-APR-81 13:32 PAGE 



S8TTL TRAP DECODER 



L 10 
98 



SEOUfNCE 128 



03714A 
037K6 
037152 
037154 
037156 
037160 
037164 

037166 
037170 
037176 



010046 
016600 
005740 
111000 
006300 
016000 
000200 

011646 
016666 
000002 



000002 



037200 



000004 000002 



•THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE 'TRAP' INSTRUCTION 
•AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
•OF THE DESIRED ROUTINE, THEN USING THE ADDRESS OBTAINED IT JILL 
•GO TO THAT ROUTINE. 

;;SAVE RO 

;;6ET TRAP ADDRESS 
; .-BACKUP BY 2 
;;GET RIGHT BYTE OF TRAP 
.-.-POSITION FOR INDEXING 
.-.-INDEX TO TABLE 
;;60 TO ROUTINE 
TO HANDLE THE "GETPRI" MACRO 

(SP).-(SP) .-.-WOVE THE PC DOWN 

4(SP).2(SP) .-.-WOVE THE PSW DOWN 
.-.-RESTORE THE PSW 

S8TTL TRAP TABLE 

•THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
•BY THE "TRAP" INSTRUCTION. 
ROUTINE 



STRAP: NOV 
MOV 
TST 
MOVB 
ASL 
MOV 
RTS 

.-.THIS IS USE 
$TRAP2: MOV 
MOV 
RTI 



RO,-(SP) 

2(SP),R0 

-(RO) 

(RO).RO 

RO 

$TRPAD(RO).RO 
RO 



037200 


037166 


STRPAD: .WORD 


STRAP2 


037202 


035370 


STYPE 


;;CALL=TYPE 


037204 


036302 


STYPOC 


;;CALL=TYPOC 


037206 


036256 


$TYPOS 


; ; CALL=TYPOS 


037210 


036316 


STYPON 


;;CALL=TYPON 


037212 


036504 


STYPDS 


;;CALL=TYPOS 


037214 


036202 


STYP8N 


;;CALL=TYP8N 


037216 


034334 


SGTSWR 


;;CALL=GTSWR 


037220 


034264 


SCKSWR 


;;CALL=C>CSWR 


037222 


034606 


SRDCHR 


;;CALL=RDCHR 


037224 


034736 


SRDLIN 


;;CALL=RDLIN 


037226 


036730 


$SAVREG 


;;CALL=SAVREG 


037230 


036766 


SRESREG 


;;CALL=RESREG 



TRAP+1 (104401) TTY TYPEOUT ROUTINE 

TRAP+2( 104402) TYPE OCTAL NlfBER (WITH LEADING ZEROS) 

TRAP+3( 104403) TYPE OCTAL NUMBER (NO LEADING 7ER0S) 

TRAP+4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 

TRAP+5( 104405) TYPE DECIMAL NlfBER (WITH SIGN) 

TRAP+6( 104406) TYPE BINARY (ASCII) NlfBER 

TRAP+7( 104407) GET SOFT-SWR SETTING 

TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR 

TRAP+1 1(104411) TTY TYPEIN CHARACTER ROUTINE 

TRAP+12(104412) TTY TYPEIN STRING ROUTINE 

TRAP-H3( 104413) SAVE R0-R5 ROUTINE 

TRAP+14 (104414) RESTORE R0-R5 ROUTINE 
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SEQUENCE '29 



35A9 



037232 
037240 
037246 
037250 
037252 
037254 
037256 
037260 
037262 
037266 
037272 
037300 
037302 



012737 
012737 
010046 
010146 
010246 
010346 
010446 
010546 
017746 
010637 
012737 
000000 
000776 



037410 
000340 



000024 
000026 



SeTTL POWER DOWN AND UP ROUTINES 



141652 
037414 
037304 



000024 



•POWER DOWN ROUTINE 




SPURON: MOV 


#$ILLUP,a#PWRVEC , 


•;SET FOR FAST UP 


MOV 


#340,a#PWRVEC*2 . 




•PRI0:7 


MOV 


RO,-(SP) 




•PUSH RO ON STACK 


MOV 


RI.-(SP) 




•PUSH R1 ON STACK 


MOV 


R2.-(SP) 




■PUSH R2 ON STACK 


MOV 


R3,-(SP) 




•PUSH R3 ON STACK 


MOV 


R4,-(SP) 




•PUSH R4 ON STACK 


MOV 


R5,-(SP) 




•PUSH R5 ON STACK 


MOV 


8SWR,-(SP) 




■PUSH aSUR ON STACK 


MOV 


SP,$SAVR6 




;SAVE SP 


MOV 


#$pwRUP,arPWRVEC 


;;SET UP VECTOR 


HALT 






BR 


.-2 


;;HANG UP 



037304 


012737 


037410 


000024 


SPWRUP: 


MOV 


037312 


013706 


037414 






MOV 


037316 


005037 


037414 






CLR 


037322 


005237 


037414 




1$: 


INC 


037326 


001375 








BNE 


037330 


012677 


141604 






MOV 


037334 


012605 








MOV 


037336 


012604 








MOV 


037340 


012603 








MOV 


037342 


012602 








MOV 


037344 


012601 








MOV 


037346 


012600 








MOV 


037350 


012737 


037232 


000024 




MOV 


037356 


012737 


000340 


000026 




MOV 


037364 


104401 








TYPE 


037366 


037416 






SPWRMG: 


.WORD 


037370 


012716 








MOV 


037372 


020000 






SPWRAD: 


.WORD 


037374 


042766 


000020 


000002 




BIC 


037402 


005037 


001346 






CLR 


037406 


000002 








RTI 


037410 


000000 






SILLUP: 


HALT 


037412 


000776 








BR 


037414 


000000 






$SAVR6: 


0 


3350 037416 


012 


015 


040 


PWRMSG: 


.ASCIZ 


3351 










• EVEN 



.•POWER UP ROUTINE 

#$ILLUP.*rPWRVEC 
$SAVR6,SP 
SSAVR6 
SSAVR6 
1$ 

(SP)*,aSWR 
(SP)*,R5 
(SP)*,R4 
(SP)*,R3 
(SP)*,R2 
(SP)*.R1 
(SP)*,RO 

#$PWRDN,a4rPWRVEC 
#340.a#PWRVEC-^2 

PWRMSG 
(PC)*,(SP) 
START 
#20.2(SP) 
$T8IT 



;SET FOR FAST DOWN 
GET SP 

WAIT LOOP FOR THE TTY 
WAIT FOR THE INC 
OF WORD 

POP STACK INTO iSWR 

POP STACK INTO R5 

POP STACK INTO R4 

POP STACK INTO R3 

POP STACK INTO R2 

POP STACK INTO R1 

POP STACK INTO RO 

;SET UP THE POWER DOWN VECTOR 

PRI0;7 

REPORT THE POWER FAILURE 

POWER FAIL MESSAGE POINTER 

RESTART AT START 

RESTART ADDRESS 

CLEAR 'T* BIT 

CLEAR THE 'T* BIT FLAG 



;;THE POWER UP SEQUENCE WAS STARTED 
.-2 ;; BEFORE THE POWER DOWN WAS COMPLETE 

;;PUT THE SP HERE 
<12><15>? POWER FAILURE - RESTARTING ?<12><15> 
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SEQUENCE 130 



5352 

■J -J -Jim. 










• SBT 


3353 


037460 


125 


116 


105 


EMI : 


3354 


037520 


125 


116 


105 


EM2: 


3355 


037567 


120 


122 


111 


EMS: 


3356 


037626 


115 


117 


104 


EM4: 


3357 


037661 


104 


125 


101 


EM5: 


3358 


037734 


113 


105 


122 


En6: 


3359 


040017 


101 


040 


115 


EM7: 


3360 


040055 


123 


125 


115 


EM10 


3361 


040121 


115 


105 


115 


EMU 


3362 


040161 


115 


105 


115 


EMI 2 


3363 


040230 


123 


122 


060 


EMI 3 


3364 


040265 


115 


115 


122 


EMU 


3365 


040321 


115 


115 


122 


EMI 5 


3366 


040360 


104 


125 


101 


EMI 6 


3367 


040427 


102 


101 


104 


EMI 7 


3368 


040505 


120 


110 


131 


EM20 


3369 


040557 


123 


122 


062 


EM21 


3370 


040612 


127 


122 


117 


EM22 


3371 


040670 


120 


101 


122 


EM23 


3372 


040726 


115 


101 


111 


EM24 


3373 


041004 


104 


101 


124 


EM25 


3374 


041055 


123 


117 


125 


EM26 


3375 


041115 


123 


122 


062 


EM27 


3376 


041171 


106 


117 


114 


EM30 


3377 


041231 


123 


125 


115 


EM31 


3378 


041273 


123 


125 


115 


EM32 


3379 


041335 


105 


122 


122 


EM33 


3380 


041401 


124 


"110 


105 


EM34 


3381 


041472 


124 


110 


105 


EM36 


3382 


041561 


111 


114 


114 


EM40 


3383 


041644 


061 


070 


055 


EM41 


3384 


041725 


106 


101 


125 


EM42 


3385 


041775 


061 


070 


055 


EM43 


3386 


042053 


116 


117 


040 


EM44 


3387 


042126 


104 


111 


104 


EM45 


3388 


042175 


116 


117 


040 


EM46 


3389 


042250 


120 


122 


105 


EM47 


3390 


042306 


062 


062 


055 


EM50 


3391 


042367 


102 


101 


104 


EM51 


3392 


042447 


062 


062 . 


055 


EM52 


3393 


042525 


104 


Ill 


104 


EM53 


3394 


042560 


127 


055 


102 


EM54 


3395 


042615 


127 


055 


102 


EM55 


3396 


042654 


127 


055 


102 


EM56 


3397 


042720 


127 


055 


102 


EM57 


3398 


042765 


116 


117 


040 


EM60 



ERAOP MESSAGES 

.ASCIZ /UNEXPECTED CPL' TRAP TO LOC. 004/ 

.ASCIZ /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 

.ASCIZ /PRIORITY BITS SET WRONG IN PSW/ 

.ASCIZ /MODE BITS SET WRONG IN PSW/ 

.ASCIZ /DUAL ADDRESSING BETWEEN HItLO BYTES OF PSW/ 

.ASCIZ /KERNEL R6 CHANGED BY WRITING SUPERVISOR OR USER R6/ 

.ASCIZ /A MEMORY MGMT. REG. TIMED OUT/ 

.ASCIZ /SUMMARY OF MEM. MGMT. REG. TIMEOUTS/ 

.ASCIZ /MEM. MGMT. REG. WOULD NOT CLEAR/ 

.ASCIZ /MEM. MGMT. REG. BITS NOT SET CORRECTLY/ 

.ASCIZ /SRO EFFECTED BY WRITE TO PSW 

.ASCIZ /MMR1 DID NOT TRACK PROPERLY/ 

.ASCIZ /MMR3 IS HOLDING THE WRONG DATA/ 

.ASCIZ /DUAL ADDRESSING BETWEEN PAR-PDR GROUPS/ 

.'ASCIZ /BAD RELOCATION,Ofi STORING DATA 18-eiT MAPPING/ 

.ASCIZ /PHYS. ADDR. FORMED WRONG IN RELOCATE MODE/ 

.ASCIZ /SR2 NOT TRACKING CORRECTLY/ 

.ASCIZ /WRONG PDR'S REFERENCED WHILE IN RELOCATE MODE/ 

.ASCIZ /PAR OR PDR CHANGED BY A RESET/ 

.ASCIZ /«AINT. MODE (SRO <8» NOT DISABLED BY A RESET/ 

.ASCIZ /DATA INCORRECT AFTER A MAINT. MODE WRITE/ 

.ASCIZ /SOURCE RELOCATED IN MAINT. MODE/ 

.ASCIZ /SR2 DID NOT LOCK UP CORRECT VIRTUAL ADDRESS/ 

.ASCIZ /FOLLOWING PAR-PDR WILL NOT ZERO/ 

.ASCIZ /SlfflARY OF DUAL ADDRESSING ERRORS/ 

.ASCIZ /SUMMARY OF COUNT PATTERN FAILURES/ 

.ASCIZ /ERROR IN BYTE ADDRESSING OF PAR-PDR/ 

.ASCIZ /THE FOLLOWING ARE DUAL ADDRESSING ERRORS FOR PAR'S-PDR'S/ 

.ASCIZ /THE FOLLOWING ARE COUNT PATTERN ERRORS FOR PAR'S-PDR'S/ 

.ASCIZ /ILLEGAL (MODE 10) STACK POINTER NOT MAPPED TO USER/ 

.ASCIZ /18-eiT MAPPING POSSIBLE HOLE IN MAIN MEMORY FROM/ 

.ASCIZ /FAULTY CARRY PROPAGATION 18-Bir MAPPING/ 

.ASCIZ /18-€IT HAPPING POSSIBLE HOLE AT TOP OF MEMORY/ 

.ASCJZ /NO TRAP THRU ERRVEC.AT 18-6IT ADDR. 760000/ 

.ASCIZ /DIDN'T GET WRAP AROUND TO ADDRESS ZERO/ 

.ASCIZ /NO TRAP THRU ERRVEC, ON NON-EXISTANT ADDR./ 

.ASCIZ /PREMATURE END OF MEMORY FOUND/ 

.ASCIZ /22-€IT MAPPING POSSIBLE HOLE IN MAIN MEMORY FROM/ 

.ASCIZ /BAD RELOCATION, CARRY PROPAGATION 22-flIT MAPPING/ 

.ASCIZ /ll-^U MAPPING POSSIBLE HOLE AT TOP OF MEMORY/ 

.ASCIZ /DID NOT GET UNIBUS ADDRESS/ 

.ASCIZ /W-fllT DID NOT GET SET IN PDR/ 

.ASCIZ /W-eiT SET IN MORE THAN ONE PDR/ 

.ASCIZ /W-eiT NOT CLEARED BY WRITING TO PDR/ 

.ASCIZ /W-flIT GOT SET DURING ODD ADDR. ABORT/ 

.ASCIZ /NO APT SPECIAL HARDWARE FOUND/ 
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1?? 

IcC 




ACT 17 


/\/fR ADi^Q iriPAAi* CDDATA RADDATA TF^TMQ FRRnRPf/ 


5S 10 


A/ Z.1 A/. 

yss IDS 


1 3n 
1 cU 


1 lU 


1 xi 


nu7n • 


Acrt T 

. AdLi J 


/PUVCm PAP A PAB S/^fBI P^ 


tS I f 


Us*»c 1 c 


1 ni 
1 U 1 


1 nA 
1 us 


inA 
1 us 




. f\o I, i A 


/AnnPFCC \/ftA URA PAR A PAR S P^U TF^TNn FRBflRPr/ 
/MUWnCO*> VOM VOM rMH S rMH J rOw ICOIPNJ CNH^^rC/ 


7/. IB 
5S 10 


OSS J 1 c 


1 07 

1 CJ 


1 00 

1 cc 


nA5 
uoc 


Unc 1 . 


ACT T 7 
. AO L i A 


/CP? UAC PyPPfTn TFCTMTI PRPnPPr/ 
/One wMO CArCCIU ICOInKJ CNnl^rL/ 


T/. 1 Q 
5S IV 


USS j5c 


1 on 


1 in 

1 lU 


1 71 

1 J 1 


Vncc • 


ACT I f 
. MO (. i i 


/PUVCTfi PAP A/CfRI F> 
/nrlTOiLU rMn S/ vvnLr ^ 


5S<:vj 


fU./. 77n 
OSS jf u 


1 ni 


1 us 


inA 
1 us 




ACT I 7 
. MO L i A 


/AnnPFCC U R A PAR A CPn UAC CP? UAC PCU TPCTMD PRRflRPf/ 
/Ml/Uncoo V.O.M. rMn oni/ wmo one wimo rOW 1 u o 1 HMJ cnnvjnri,f 


jSc 1 


ysss f u 


1 CS 


in^ 

1 \jj 


1 ?x 

1 C J 


nu7A • 
uncs . 


A^r I 7 

• MO L i A 


/TFCTNTI FRRflRPf/ 


jScc 


VSS J 1 u 


ini 

1 U 1 


1 us 


inA 

1 us 


nuXn. 

UrUU- 


A^r I 7 

• MO L i A 


/AnnRFCC l>ATA TFCTMn FRPnRPf/ 


y«c J 


USS 3 jU 


1 ni 

1 U 1 


1 r\L 
1 us 


in^ 

1 us 


nuXl • 
vnj 1 • 


A^r I I 

• MOLi i 


/AnnpnR addramd AortRnp AonRANO/cfRi f> 

/Muunun Mi/un/v»/ Mi/i/ni^ ^^ui/n^rn// v^nur 


jScS 


vSSO 1 U 


1 1 s 


117 

1 1 f 


ini 

1 U 1 




• MOL i A 


/I HADFD J nADFf) FMARi FD FNARI TFSTNO #FRftOftS/ 


y*cj 


USSOO' 


ini 

1 U 1 


1 C\L 
1 US 


inA 
1 us 


unjc • 


A^r 17 

•MOLi A 


/ADDRnR ADDRAMD PATRMDR PATRNAD DATAnR DATAAM) TFSTNQ iTFRRnRC/ 
/ m/unun Mi/i/nMPV r/^inniur^ rMiniv^ir i/^i/Mjn i/^i/w«i/ iu<^i'«v wtnnuno/ 


jScO 


USSf Of 


ini 

1 U 1 


1 us 


1 us 


vnjj • 


A^r 1 7 

• MO L i A 


/AnnRFCC FVPFfin RFfFIVn TFCTMn PRRDRPf/ 




us jUjf 


ini 


1 us 


inA 
1 us 


UMjS . 


A^r 1 7 

• MO L i A 


/AnnRFCC AnnRFCC/ 

/MUUnCOO MUUnCOO/ 


y*co 


us jUj» 


ini 

1 U 1 


in^ 
1 us 


inA 
1 us 


uruo • 


ACf I 7 
• MO L i A 


/AnnRFCC nATARFn PATTFRM fniMT TFCTMn/ 
/MUUnCOO UMIMnCU rMI 1 Cnni l.iAJ««l icoi^mj/ 




USD ICO 


1 

Ice 


IUj 


ini 

1 U 1 


unsu- 


ACf I I 


/RFAnnPP TFCTMn FRRnRPf /^fRI F> 
/nCMUUrr ICOiniw cnnl^r ^/ ^lr"l.r ^ 


jS 


us J 1 JO 


1 CJ 


1 CS 


ini 

1 U 1 




ACf 1 7 


/CTAflf / 
/ O IMvK/ 


jS J 1 


us J lOS 


IPX 

1 CJ 


1 CS 


ini 

1 U 1 


nu^l • 
wns 1 • 


A^f 17 
■ MOLi A 


/CTARTRK FINICMK TF^TNfl FRRflRPf/ 


JS JC 


us Jcc J 


1 Cw 


1 U 1 


1?^ 

1 CS 


unsc • 


ACfT T 


/PATTFRM RATA AnDRF^^/CfRI F> 
r rni 1 cnn umim Aui/ncoo/ v^nLr ^ 


jS JJ 


us JC J J 


1 1 s 


117 

1 1 f 


ini 

1 U 1 




ACf I 7 
• MO L i A 


/I flAnpn FFTfMFn fMTFMnFn TFCTMn FRRHRPf/ 
/ UuMUC u r c f vncu m i Cfw/ci/ i c o f '^hj cnnunr • / 


jS jS 


us JJC » 


IPX 

1 CJ 


1 ?A 

1 CS 


ini 

1 U 1 


uns J • 


ACf I 7 
•MOvi A 


/CTARTRir TFCTMn FRRDRPf/ 

/ O 1 Mn 1 1 C O 1 PK/ CnnvM\r\,/ 


jS j3 


us jjjr 


1 us 


ini 

1 U 1 


1 ?^ 

1 CS 


UrIS J • 


ACf I 7 
• MO L i A 


/nATA TPCTMD FRRDRPf/ 
/UMIM icoiivw cnnunrL/ 


Ty T/i 
jS jO 


us JSUf 


1 1 o 


ins 
1 \jj 


ini 

1 U 1 


unso • 


ACf I 7 
*MOL i A 


/MFAnnR TFCTMn FRRnRPf/ 


jS 


us JS jO 


1 1 J 


111 

1 1 1 


i?n 
1 cu 


unsf ♦ 


ACf I 7 
• MO L i A 


/KJPAO/, 1 ACTRI nf K TF^TMQ FRRORPf/ 
/i\i~/m*f cMOiwCvL^ itoii^iy cnnun* v/ 


jS jO 


us J JVC 


1 cu 


in^ 

1 us 


1?? 
1 cc 




ACf I T 
« MOL i 1 


/POR VIRTliAl /<tm F> 
/ r un V in f vuncr ^ 




045522 


124 


105 


123 




ASCII 


/TESTED ADDRESS TESTNO ERROfiPC/ 


3440 


045562 


120 


104 


122 


DH55: 


.ASCII 


/PDR IN PDR VIRTL1AL/<CRLF> 


3441 


045o12 


105 


122 


122 




.ASCIZ 


/ERROR TESTED ADDRESS TESTNO ERRORPC/ 


3442 


045662 


120 


104 


122 


DH56: 


.ASCIZ 


/PDR TESTNO ERRORPC/ 


3443 


045712 


120 


104 


122 


DH57: 


.ASCIZ 


/PDR WAS EXPECTD TESTNO ERRORPC/ 


3444 


045752 


105 


122 


122 


DH60: 


.ASCIZ 


/ERRORPC/ 


3445 












.EVEN 
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C 11 

102 



SEQUENCE 1 52 



34A6 

5450 
3A51 
3A52 
3A53 

3A55 
3456 
3457 
34 58 
3459 
3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 
3474 
3475 
3476 
3477 
3478 



045762 
046000 
046022 
046034 
046044 
046060 
046074 
046112 
046124 
046136 
046152 
046170 
046212 
046224 
046246 
046254 
046266 
046300 
046312 
046330 
046352 
046366 
046376 
046412 
046424 
046440 
046450 
046460 
046472 
046504 
046520 
046530 



001260 
001260 
001162 
001162 
001320 
001162 
001162 
001170 
001166 
001162 
001162 
001302 
001270 
001302 
001254 
001164 
001270 
001162 
001316 
001316 
001162 
001162 
001162 
001200 
001166 
001200 
001164 
172350 
001174 
001162 
001174 
001116 



001262 
001262 
001164 
001254 
001316 
001164 
001164 
001164 
001164 
001164 
172350 
001276 
001164 
001276 
001116 
001166 
001172 
001166 
001320 
001320 
001166 
001164 
001166 
001202 
001170 
001254 
001254 
003022 
001170 
001174 
001254 
000000 



001256 
001256 
001254 
001116 
001274 
001164 
001166 
001254 
001254 
001166 
001164 
001300 
001254 
001172 
000000 
001254 
001254 
001254 
001306 
001312 
001164 
001254 
001172 
001254 
001162 
001116 
001116 
001254 
001254 
001170 
001116 



DTI 

DT2 

DT3 

DT7 

DT10 

DT11 

DT12 

DTK 

0115 

DT16 

DT17 

DT20 

DT21 

DT22 

DT24 

DT25 

DT27 

DT30 

0T31 

DT32 

DT33 

DT35 

DT37 

DT41 

DT42 

DT43 

DT45 

DT47 

DT54 

DT55 

0T56 

DT60 



.S6TTL DATA TABLES 

, WORD TRAPPC . TRAPPS . WASR6 . CPUERR . TE S TNO . $E RRPC . 0 

. WORD TRAPPC , TRAPPS . UASR6 , UASSRO , UASSR 1 , WAS SR2 . ^ E S TNG, $F RRPC . 0 

.WORD SRE60.iRE61,TESTNO,$ERRPC,0 

.WORD $RE60.TESTNO.$ERRPC,0 

.WORD ADRANO,ADDROR.T0Nl«.TESTNO.$ERRPC.0 

.WORD $RE60,$REG1,$REG1.TESTNO.$ERRPC.O 

.WORD $REG0.$REG1 .$fiEG2.$REG2.TESTNO.$ERRPC.O 

.WORD $fiEG3.$REG1.TESTN0,$ERRPC,0 

.WORD $REG2.$fiEG1.TESTNO.$ERRPC,0 

.WORD SREG0,SREG1,$REG2,TESTNO,$ERRPC,0 

.WORD $REG0,KIPAR4,$RE61,$RE62-TESTNO,$ERRPC,0 

. WORD P«ALO . VIRT1 . VIR f 2. $«EG4 .SREGS . STMPO . TE S TNG. SERRPC , 0 

.WORD WASSR2.SREG1 JF >TNO,$ERRPC.O 

.WORD P8ALO,VIRT1.$RL64,UASSR0,WASSR2,$TMP0.TESTNO.$ERRPC,0 

.WORD TESTNO^iERRPCO 

.WORD $RE61.$REG2,TESTNO.$ERRPC.O 

.WORD UASSR2«$REG4,TESTNO,$ERRPC,0 

.WORD SRE60,$REG2,TESTN0,ERRCNT,0 

. WORD ADOROR , AORAND , DATAOR , DATANO , TE S TNO , ERRCNT , 0 

. WORD ADDROR « ADRAND , PATTOR , PATAND , DATAOR , DATAND , TES TNO , ERRCNT , 0 

.WORD $REG0,$REG2,$REGnTESTNO.$ERRPC,0 

.WORD SREGO.SREG1,TESTNO,0 

.WORD $REG0.$REG2,$REG4,$REG1,TESTNO,0 

.WORD $TMP1.$THP2.TESTNO,$ERRPC.O 

.WORD $REG2,SREG3.SREG0,TESTN0,$ERRPC,0 

.WORD $T«P1,TESTNO,$ERRPC,0 

.WORD $REG1,TESTNO,»£RRPC.O 

.WORD t(IPAR4,$LSTBK.TESTN0,$ERRPC,0 

.WORD $RE65,$RE63,TESTNO.$ERRPC,0 

.WORD $RE60,$REG5,$REG3,TESTNO,$ERRPC,0 

.WORD $REG5,TESTNO,SERRPC,0 

.WORD SERRPCO 
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DATA FORMATS 



3*1 rV 










CQTTI 


Vn 1 ^ r 








AAA 

000 


AAA 

000 


vr 1 : 


QV TC 


n n n 


u.u 




000 


AAA 

000 


AAA 

000 


vr c : 


DVTC 
.or 1 1 


n n n 


n n n n n 

U.'J.U.U.U 


54o< Oh6551 


AAA 

000 


AAA 

000 


AAA 

000 


r>c T . 
vr 3 . 


• Or 1 1 




A 

u 


AAA 
000 


AAA 

000 


AAA 

000 


vr f . 


•.or 1 1 






5484 046560 


AAA 

000 


AAA 

000 


AAi 

00 1 


INC 1 A 

Dr 10 


DVTC 
.Br 1 1 




r\ (\ 
u.u 


5485 046565 


AAA 
000 


AAA 
000 


AAO 

OOc 


INC 1 1 

vr 1 1 


DVTC 


n n 5 

0,U«£, 




5486 0465 


AAA 
000 


AAA 
000 


AAA 
000 


INC 1 5 

vr\c 


QVTC 
.Br 1 C 


n n n 


5 n n 




AAA 

\rJ\) 


VAA/ 




vr 1 D 


. o r 1 c 


0 0 0 


0 0 0 


3488 046606 


003 


000 


000 


DF20 


.BYTE 


3,0.0. 


0.0.0.0.0 


3489 046616 


000 


000 




DF24 


.BYTE 


0.0 




3490 046620 


000 


000 


000 


DF32 


.BYTE 


0.0.0. 


0.0.1 


3491 046626 


000 


000 


000 


DF33 


.BYTE 


0.0.0. 


0.0,0.0.1 


3492 046636 


004 


000 


000 


DF43 


.BYTE 


4.0.0 




3493 


000001 








.END 







SEQUENCE 



/ 



CKKTABO 


1 1 /AA HEM MGHT 


PRT A 


MACRO 1 


SYMBOL 


TABLE 






ABASE = 


000000 


Bi TOO = 


AAAAA1 
00000 1 


ACDWl = 


000000 


BITOl = 


00000<: 


ACDU2 = 


000000 


BIT02 = 


OOOOOA 


ACPUOP= 


000000 


O f TAT mm, 


000010 


AODROR 


001316 


BI TOA = 


0000^0 


ADOUO = 


000000 


ft T tac _ 

BIT05 = 


OOOOAO 


A00U1 = 


000000 


ft f T AZ. _ 


AAA1 AA 

000100 


A0[)U10= 000000 


r% T TA7 — . 


AAAOAA 

000^00 


AtX)W1 1 = 


ULRaaXJ 


ft t tao 

Bl TOo " 


AAA/ AA 

OOOhOO 


ADOWii:= 


(XXXaaJ 


61109 = 


AA1 AAA 

001000 


Ar\ru I'l T— 
ADDWI5- 


UOOUw 


ft f T 1 * 

BI T 1 = 


AAAAAO 

OOOOOc 


ADDW1«»= 


UOOUW 


O T T 1 A *> 

Bl TIU = 


AAOAAA 

OOtOOO 


ADOWl 3- 




Blin = 


AA/ AAA 

OOhOOO 


ADDW£ - 




BlTli: - 


A1 AAAA 

01 0000 


AOOWj = 


uuuuuu 


BITI3 = 


A^AAAA 

OcOOOO 


A0DW4 = 


000000 


BITlH - 


A/ AAAA 

0*»0000 


AD0W5 = 


000000 


O T Ti C — 


i AAAAA 

1 00000 


ADDW6 = 


000000 


D I T T ™ 

81 \c ~ 


AAAAA/ 

OOOOOh 


ADDW7 = 


000000 


Q I T T — 

81 1 J 


AAAA1 A 

00001 0 


A00U8 = 


000000 


Bl 1 H 


AAAAOA 

OOOOcO 


AD0W9 = 


000000 


Bl 13 


AAAA/ A 

OOOOhO 


ADEVCi= 


000000 


Bl To 


AAA1 A A 

000100 


ADEVM = 


000000 


O I T 7 — 


AAA OA A 

OOOcOO 


ADRAND 


001320 


Bl T o - 


AAA/ AA 

OOOhOO 


AENV = 


000000 


O I TO — 

Bl TV - 


AA1 AAA 

00 T 000 


AENVM = 


000000 


8PT VtC- 


AAAA1 L 


AFATAL= 


000000 


r^ciJD — 
LKoWK - 


1 (\LL 1 A 


A«ADR1 = 


000000 


r 1 c Aftii 1 
CLEArW 


AA007A 


««ADR2= 


000000 


CLRRtu 


AAOOAA 


A«A0R3= 000000 


CMou 


A7C777 


AnADR4= 


000000 


LNTRLL 


ATQOAA 

OjjcOU 


AMArtS1 = 


000000 


rDC AWC 

CPbAVc 


Ojjchh 


A«AMS2= 


000000 


LPUtRR= 


1 777^X. 


A«A«S3= 


000000 


rot ic vo 
CrUtXP 


AA1 77Z 
00 1 




000000 


L H 


AAAA1 Q 
0000 T J 


AHSGAO= 


000000 


CRLF 


AAA OAA 

000<:00 


AHSGL6= 


000000 


DATAND 


AA1 71 A 

001 jlO 


AMSGTY= 


000000 


DA 1 AOR 


AA1 7Ai^ 

00 1 jVo 


AMTYP1= 


000000 


r\r\ f CD * 


1 77^7A 


AHTYP2- 


000000 


r\c 1 
Or 1 


U*»Oj j*» 


AMTYP5= 000000 


Dr lU 


A/ XCAA 


A«TYP4= 


000000 


t\c 1 1 


A/ 


APASS = 


000000 




A/4LC70 


APRI0R= 


000000 


DP 16 


A/ iLiLAA 

OhOOOO 


APTCSU= 


000040 


VT d 


A/iLCZ1 

OhOjh 1 


APTENV= 


000001 


Dr cO 


OhOOOO 


APTSJZ= 


000200 


Dr £H 


OhOOI o 


APTSPO= 


000100 


Dr 3 


AZiLCCI 
OnOJ J 1 


APTTST 




Dr j<: 


A/ i^/L on 


ASWREG= 


000000 


Dr 3 J 


A/ X.AOi^ 


ATESTN= 


000000 


Dr *• J 


A/ Ai^7A 


AUNIT - 


000000 


Dr z' 


A/ iLCCC 


AUSWR = 


000000 


DHl 


A/ 7A07 
0*1 30^ J 


AVECn = 


000000 






AVECT2= 


000000 


DH11 


043372 


BAOPC 


001324 


DHl 2 


043512 


BITO = 


000001 


DHl 3 


043652 



E 11 

113 23-APR-81 13:32 PAGE ''03-1 



vn iH 


\JHjf\JC 


nT^5 


vn 1 J 


A/ 77^0 
Uh jf *»c 




Vn lo 


nA^nno 


r>TS4 


r>ul 7 




nT55 


i/ric 


U** J 1 yjj 


nT5^ 




A// 1 AZ 
UHH 1 OH 


nT6n 


uric 1 


A//71 P 


r>T7 


rtMO? 
uncc 


\jhhjjc 




unc*» 


\JHHH r \J 


FMT\/Fr = 


unj 




C'^ ' 


urijv 


\JHHJ 1 V 


FM10 

tn 1 1/ 


urij 1 




C( t ■ 1 


r>H^? 


\JHH\J\Jf 


FM1? 


DM^3 




FM13 






FM14 




0AS0S7 


FM1 5 






FM1A 




0^S16A 


FM17 




04S2P5 


FM? 






FM?0 


DMAS 


0/5757 


FM?1 

erne 1 








DMA? 


045436 


Fn?3 




04550? 


FM?4 


dhss 


045562 


FM?5 




04566? 


FMP6 


tH57 


04571 ? 


FMP7 


[)H60 

i/nw 


04575? 


FM3 


OH? 


043?4? 

w"t JC "tC 


Fn30 


D I ^Pl A 


001 14? 


FM31 


l/l .^r F^C 


0001 74 


Fn32 


l/own 


1 77570 


FM33 


DTI 


04576? 


Fn34 


HTIO 

1/ 1 1 V 


046044 


FM36 


DT1 1 


046060 


FM4 


DTI? 


046074 


FM40 


1/ 1 1 ~ 


0461 1 ? 


EM41 


DTI 5 


0461 ?4 


FM4? 


DT16 


046136 


EM43 


DT17 


0461 5? 


EM44 


OT? 


046000 


En45 


DT20 


0461 70 


FM46 

t.1 r^W 


DT21 


046?1? 


En47 


DTP? 


V*tv/CC~ 


FM5 


DT?4 




FMSO 


DTPS 


046?54 


EM51 




046?66 


FM52 


DT3 


0460?? 


EM53 


DT30 


046300 


EM54 


DT31 


04631? 

V*tw^ 1 C 


En55 


DT32 


046330 


EM56 


DT33 


046352 


EM57 


DT35 


046366 


E«6 


DT37 


046376 


EM60 


DT41 


046412 


EM7 


DT42 


046424 


ERRCNT 


DT43 


046440 


ERROR = 



SEQUENCE 134 



046450 ERRTfP 033626 

046460 ERRVEC= 000004 

046472 FORMPA 003426 

046504 GTSUR = 104407 

046520 HDWFLA 001340 

046530 HOLFLG 001336 

046034 HT = 000011 

002334 IBSAVE 033624 

000030 10TVEC= 000020 

037460 ICDPARO= 172360 

040055 KDPAR1= 172362 

040121 KDPAR2= 172364 

040161 ICDPAR3= 172366 

040230 KDPAR4= 172370 

040265 KDPAR5= 172372 

040321 KDPAR6= 172374 

040360 KDPAR7= 172376 

040427 KDPDR0= 172320 

037520 KDPDR1= 172322 

040505 KDPDR2= 172324 

040557 KDPDR3= 172326 

040612 KDPDR4= 172330 

040670 KDPDR5= 172332 

040726 KDPDR6= 172334 

041004 KDPDR7= 172336 

041055 KERSTK= 001100 

041115 KIPAR0= 172340 

037567 KIPAR1= 172342 

041171 KIPAR2= 172344 

041231 KIPAR3= 172346 

041273 KJPAR4= 172350 

041335 KIPAR5= 172352 

041401 ICIPAR6= 172354 

041472 ICIPAR7= 172356 

037626 KIPDR0= 172300 

041561 KJPDR1= 172302 

041644 KIPDR2= 172304 

041725 KJPDR3= 172306 

041775 KIPDR4= 172310 

042053 ICIPDR5= 172312 

042126 ICIPDR6= 172314 

042175 KIPDR7= 172316 

042250 KSP =1000006 

037661 LF = 000012 

042306 LOOP 020454 

042367 MGMERR 003330 

042447 ncnF LG 003332 

042525 MHRO = 177572 

042560 MMR1 = 177574 

042615 Mf1R2 = 177576 

042654 ff1R3 = 172516 

042720 MMVEC = 000250 

037734 OLDPC 001326 

042765 OLDPS 001330 

04001 7 PARCOU 002400 

001322 PAR TAB 001356 

104000 PATAND 001314 



F 11 



CICK.TABO 


11/44 MEW MGMT 


F*RT A 


Ma ^ t\f^ U4 4 4 7 

HACRO Mill 3 


^7 Ann 0 4 

23-APR-81 


13:32 PAGE 


4 AT 1 

103-2 








SYWOL 


TABLE 


















PATRfiS 


02702<t 


SIPAR7= 


172256 


TPVtC = 


AAAA^ / 

000064 


UDPAR1= 


177662 


$CM4 = 


y%y% A A yv ^ 

000006 


PAT TOR 


001312 


SIPDRO= 


4 7T Trtrt 

1 72200 


TRAPPC 


AA 4 1^ A 

001 260 


UDPAR2= 


1 77664 


SCNTLC 


001350 


PBAHI 


001 30*1 


SIF*0R1 = 


1 72202 


TRAPPS 


AA1 1^ 1 

001 c62 


UDPAR3= 


1 77b6o 


SCNTLG 


/\ 70 7 4 

035231 


PBALO 


001302 


SIPDR2= 


1 72204 


TRAPVE= 


AAA AT/ 

000034 


UDPAR4= 


4 77^ 7A 

1 77b70 


SCNTLU 


035224 


PCPUER 


Art4 '77^ 

001332 


S]PDR3= 


172206 


TRTVEC= 


A AAA 4 / 

000014 


UDPAR5= 


4 77^ 7^ 

1 77b72 


SCORE 


002676 


PFECDf 


03A260 


SIF>0R4= 


1722 lO 


TC' T i 

TSTl 


A1ACZ. / 

020564 


UDPAR6= 


4 77Z 7/ 

1 77b7(t 


SCPUOP 


001252 


PFECDH 


034220 


SIPDR5= 


4 7n4 

172212 


Y C ▼ 4 A 

TSTIO 


A1 4 / 11 

021422 


UDPAR7= 


4 77^ 7rf 

1 77676 


SCRLF 


001221 


Pr ECDT 


034250 


SJPDR6= 


172214 


▼ f* T 4 4 

TSTl 1 


A14 / / A 

0^1 h40 


UOPDRO= 


4 77^ "^rt 

1 77620 


SCROUT 


002726 


PFECcn 


034160 


sipdr7= 


172216 


T P T 4 

TSTl? 


All / CZ 

021456 


■ if \ nf\n 4 

UDPDR1= 


4 77Z 11 

1 77622 


SDBLK 


036720 


F^ECWS 


AV y 4 f A 

034150 


SRO = 


177572 


TST13 


A14 ■* T/ 


UDPDR2= 


4 77Z 1> 

1 77b2H 


S0B20 


037024 


PIRO = 


1 77772 


SRI = 


1 7757 H 


TST14 


A14 C 1 1 

021512 


UDPDR3= 


4 77Z 1^ 

1 77626 


SDEVCT 


001234 


■ It f%/\k jP _ 

HIRQvt= 


000240 


SR2 = 


1 7757b 


▼ C ▼ 4 C 

TST15 


A14 Z. C / 

021654 


UDPDR4= 


4 77^ TA 

1 77630 


SDOAGN 


/\7^70 ^ 

032752 


PRO = 


oooooo 


SR3 = 


172516 


T C T 4 Z. 

TST16 


A'51 y^ / 
Ocl /1 4 


UDPDR5= 


4 77Z.T1 

1 77652 


SDTBL 


n 7 ^ 74 y\ 

036710 


PRl = 


OOOOhO 


SSP =! 


{000006 


TCT1 "y 

TSTl / 


022320 


UDPDR6= 


1 7765H 


SENDAD 


032742 


= 


A/VM AA 

000100 


STACK = 


001100 


TST2 


A^A^/ 

020642 


UDPDR7= 


1 77636 


SENDCT 


7 "^O 7/^ 

032570 


PR3 = 


0001 hO 


START . 020000 


TC» T ^A 

TST20 


All/ / 1 

022442 


1 1 V n A nA 

UIPARO= 


4 77Z / A 

1 77640 


SEfyWLL 


03301 4 


nfi/ — 
PH*» = 


AAA'^AA 

OOOcOO 




1 7777/ 


TST21 


022640 


UIPAR1= 


4 77Z / 1 

1 77642 


$ENV 


001244 


DOC . 

PR!) = 


000<:hO 


CI IDC T^ — 


\j\J\jf\/\} 


T c T n 
JSJdc 


0c3036 


UIPAR2= 


4 77Z / / 


SENVM 


AA4 1 y O 

001245 


PRO = 


AAA7AA 

000500 


CLA 


AA1 1 /.A 


TO T IT 

TST23 


A'^T IT/ 

023234 


UIPAR3= 


4 77Z / ^ 

1 77646 


$E0P 


/\7 O y /\ 

032540 


PR/^ = 


000340 




AAA1 7^ 




ATT/ 

023432 


UIPAR4= 


4 77Z CA 

1 77650 


$EOPCT 


7 ^O y 

032562 


P5 = 


1 ff f fO 


cijA — 


AAAAA1 


TCT IC 


A^TZ 1A 

023630 


UIPAR5= 


1 77652 


SERF L 6 


nA4 4 y%7 

001 103 


P5W = 


1 rfffO 


5WOU - 


AAAArtl 


Tf T IZ^ 

TSTZ6 


A1/ A1Z. 

024026 


UIPAR6= 


4 77^ C / 

1 77654 


SERMAX 


001115 




03/416 


oWO 1 - 


AAAAAO 


TP T 17 


A1/ 4 / A 


UIPAR7= 


4 77Z CZ. 

1 77656 


SERROR 


7 7 1 y y 

033246 




0000^4 


curt? - 


AAAAA/ 

UUUUUh 


TCTT 

T5T3 




1 1 T nfvn A. 

UIPDRO= 


1 77Z. AA 

1 77600 


SERRPC 


AA4 4 4 ^ 

001 116 


ROCHR = 


10441 1 


cur>7 - 

oWUj - 


UUUU 1 u 


TC TTA 


A1/ 1C 1 


1 1 T nfvf\ 4 _ 

UIPDR1= 


4 77Z A1 

1 77602 


SERRTB 


A A 4 7 7 

001372 


RDLJN = 


10441c 


oWO*» - 




TC TT1 

T5T31 


A1/ TZ./ 


UIP0R2= 


1 77604 


SERTTL 


AA4 4 4 1 

001 112 


RcADON 


00134c 


cuOC - 
oWV/j - 


\jyAJ\jHij 


Tf* TTI 

TST32 


A1/ CA1 

024502 


UIP1>R3= 


4 77^ A^ 

177606 


SESCAP 


A/\ 4 4 

001212 


RESREG= 


104414 


CUTML — 
dWUO - 


OUU lUU 


T5T33 


AO/ ^OA 

0c4620 


UjPDR4= 


i 77Z. 4 A 

1 7761 0 


*p ▼ Am 

SETABL 


nn4 iy J 

001244 


RESVEC= 


000010 




nnnonn 

UUvcUU 


TO TTy 

TST34 


AO/ 

024736 


UIPDR5= 


1 7761 2 


SETEND 


AA4 If / 

001254 


RniREG= 


177770 


oWUO — 


UvU'iUv 


TST35 


025042 


UIPDR6= 


17761 4 


SFATAL 


AA4 "^^d 

001226 


R6 =2000006 


cuno — 

oVnJy — 


UU 1 UUv 


TST36 


AOC 1 / ^ 

025146 


UIPDR7= 


177616 


SFFLG 


A7Z 1/\A 

036200 


R7 =1000007 


CLJ1 — 


UUUV/vc 


JSJjf 


AOC OCO 

025252 


USESTK= 


000600 


SFILLC 


nn 4 4 o ^ 

001156 


SAVREG= 


104413 


dW 1 v — 


UUcvUU 


TC T/ 

T5T4 


A01 ACA 

OclOSO 


USP =1000006 


SFILLS 


AA4 4 CO 

001 1 55 


SCOPE = 


000004 


cut 1 — 




TCT/ A 

TSl40 


AOC TC^ 


VIRTl 


001276 


SGDADR 


AA4 4 1A 

001 120 


SDPARO= 


172260 




010000 


TC T/ 1 

TST41 


AOC/ 

025462 


V1RT2 


001300 


S6DDAT 


AA4 4 iy 

001124 


S0PAR1= 


172262 


SW13 = 


020000 


TCT/ ^ 

TST42 


025566 


UASR6 


001256 


T y 1 

S6ET42 


A7174 / 

032714 


SI>PAR2= 


172264 


SW14 = 


040000 4 


TO T/ T 

TST43 


025662 


UASSRO 


001264 


SGTSUR 


A7y 77y 

034334 


S0PAR3= 


172266 


SW15 = 


lOOGOO 


TOT// 


AO^ HA 

026210 


UASSRl 


001266 


SHD = 


Ann AAA 

OOOOOO 


SDPARA= 


172270 


SW2 = 


000004 


T O T / C 

TST45 


A1Z T/ / 

02634* 


UASSR2 


001270 


SHIBTS 


AAA "^A / 

000204 


S0PAR5= 


^72272 


SU3 


000010 


T C T/ ^ 

TST4o 


A1ZZ. A1 

026602 


ueiT = 


000100 


SICNT 


001104 


S0PAR6= 


\7227i* 


SW4 = 


000020 


T r* T / 7 

TST4/ 


02727b 


$APTHD 


000204 


SILLUP 


037410 


SI>PAR7= 


y7227t 


SU5 


000040 


T O T C 

TST5 


A14 14 / 

021214 


SATYC 


035760 


SJNTAG 


AA4 4 70 

001135 


SDPORO= 


172220 


SU6 


000100 


tctca 
TSTjO 


ATA1 Ti. 

0301 36 


SATY1 


035734 


SITEnB 


AA4 4 4/ 

001114 


SDP0R1= 


172222 


SW7 = 


000200 


T O TC 4 

TST5 1 


ATI AOA 

031 020 


JATY3 


035742 


SKThtX 


AAI^ 7 A 

002670 


S0P0R2= 


172221, 


SW8 = 


000400 


TCTCO 

TSTdc 


AT ^ 1.1 i 

031634 


iATY4 


035752 


^ft^Tf^ IT 

SKTOUT 


AAI^ Z A 

002660 


S0PDR3= 


172226 


SW9 = 


001000 


T r tCT 

TST53 


AT1A7 A 

032030 


SAUTOB 


001134 


T 4 4 

SKTll 


/\A1C4 1 

002512 




172230 


T8IT = 


000020 


▼ P T t / 

TST54 


A7 17^ 

032236 


SBDADR 


001122 


SLF 


AA 4 1*^'% 

001 222 


S0P0«5= 


172232 


TBI TPS 


001272 


TC TCC 


ATI/ / / 


SeDDAT 


001126 


SLFLG 


ATZ 1 77 

056177 


S0P0R6= 


172234 


TBITVE= 


000014 


T C T^ 

TS 16 


All 7^Z. 

0?1 366 


SBELL 


001214 


1 AAA 

SLOOP 


ATTAl A 

033010 


S0PDR7= 


172236 


TESTNO 


001254 


TC T 7 

TST/ 


A 1 i / A/ 


SBIN 


036254 


SLPADR 


AA4 4 A^ 

001 106 


SIPARO= 


172240 


TIMERR 


003232 


TYPoN = 


4 A/ / AZ. 


SCHARC 


035730 


SLPERR 


AAi 1 1 A 

001 no 


SIPAR1= 


172242 


TIMFLG 


003234 


TYPDS = 


^ f\i t AC 

104405 


SCKSUR 


034264 


9 1 O T A f\ 

SLSTAD 


/\ATA1A 

003020 


SIPAR2= 


1 72244 


TIMTST 


003024 


TYPE = 


4 A/ / A4 

104401 


SCLR.T 


032732 


SLSTBK 


AATA11 

003022 


Si PAR 3= 


172246 


TXVEC = 


000060 


Tvonr — 


1 u*»*»Uc 


SCMTAG 


001100 




W 1 CC*» 


SIPAR^= 


172250 


TOFF 


002172 


TYPON = 


104404 


$CM1 = 


000006 


SMBAOR 


000206 


SI PARS- 


172252 


TON 


002226 


TYPOS = 


104403 


$CM2 = 


000014 


SMFLG 


036176 


SI PAR6= 


1 72254 


TONCJH 


001274 


UDPARO= 


177660 


$CM3 = 


000006 


SHNEW 


035247 



SfOUENCE 135 



L. 





11 /A4 MEM MGMT 


PRT A 


MACRO Mill 3 


"^T Ann Oi 

23-APR-81 


1 3 . 3<: r 


SYMBOL 


TABLE 












WIS GAD 


001240 




$OUES 


001220 


ISCOPE 


ATTA 1A 


SMSGLG 


001242 




$RDCHR 


054606 


# c r Ti 

»SETLF= 


AAAi T^ 


W1SGTY 


001 22A 




$RDLIN 


054756 


SSjZE 


AAO/ C / 

00<:45<t 


V1SWR 


035256 




SRDSZ = 


000010 


SSiZEX 


002732 


W1XCNT 


001 




SREGAO 


001160 


JSTLF = 


\ f f f t f 


WAJLL 


001154 




SREGO 


001162 


>SVLAD 


ATT1 7/ 

U33 1 ^4 


*NUTST= 


000001 




SREG1 


001164 


SSvPC = 


AAA'^A/ 

000204 


SOCNT 


036500 




SREG2 


001166 


>SWR = 


1 7T/ A A 
1 f 3400 


tOCTVL 


037126 




$REG3 


001 1 70 


>SWRtu 


AA1 "^Z 

00 1 £46 


SOhOOE 


036502 




$PEG4 


001 1 7Z 




AAAAAA 
OOOJOO 


tOVER 


033230 




SREG5 


001 1 74 


J TBI T 


AAi T/ ^ 


iPASS 


001232 




SRESRE 


036766 


»TtSTN 


AAi OTA 
00 1 £30 


iPASTM 






SRTNAD 


03301 2 


• TKB 


UOl i4o 


tPWRAO 


037372 




SRTRN 


055006 


STKS 


001 144 


SPWRDN 


037232 




SSAVRE 


036750 


STMPO 


001176 


WRMG 


037366 




»SAvR6 






AAI OAA 

00 icUU 


c n» icu lo 


037304 












. ABS. 


046641 


000 












000000 


001 











ERRORS DETECTED: P 

VIRTUAL MEMORY USED: 59464 WORDS ( 233 PAGES) 
DYNAMIC MEMORY: 20034 WORDS ( 77 PAGES) 
ELAPSED TIME: 00:06:06 

C<K TAB. BIN. CKKTA8/CR/-SP/NL:T0C-CKKTA8. MLB/ML. CKKTA8. P1 1 



$TMP2 001202 

$TMP5 001204 

$TMP4 001206 

$T(1P5 001210 

$TN = 000056 

$TP6 001152 

$TPFL6 001157 

$TPS 001150 

$TRAP 037144 

$TRAP2 057166 

$TRP = 000015 

STRPAD 057200 

STSTM 0002 1 0 

STSTJyW 001102 

STTYIN 035214 

STYP8N 056202 



STYPDS 056504 
STYPE 035370 
STYPEC 035602 
STYPEX 035752 
$TYP0C 056502 
STYPON 056516 
$TYP0S 056256 
SLINIT 001256 
$UNITM 000214 
$USUR 001250 
SXOFf = 000025 
$X0N = 000021 
SXTSTR 055052 
$$GET4= 000001 
SOFILL 036501 
.$X = 000204 



SEQUENCE 







CRFATED Br 


MACRO ON 23-APR-81 A 




CROSS REFERENCE 








VALUE 


REFERENCES 




ABASc 




000000 


16-1276 




ACDWl 




000000 


16-1276 








000000 


16-1276 


16-1276 


A f Tm tf^A 

ACRJUP 




000000 


16-1276 


AODKOK 




001316 


#16-1276 


•26-1637 






102-3465 


102-3466 


AODwU 


- 


000000 


16-1276 




A r r\i ii 

ADQWl 




000000 


16-1276 




A r\p\i il 

AODWl U 




000000 


16-1276 




ADDWI 1 




000000 


16-1276 




A^^ li 




000000 


16-1276 




AODW 1 3 


- 


000000 


16-1276 




AODW 1 




000000 


16-1276 




AODW 1 3 




000000 


16-1276 




AODWc 




000000 


16-1276 




A0DW5 




000000 


16-1276 




AODWs 


- 


000000 


16-1276 




AODW 3 


- 


000000 


16-1276 




AODWd 




000000 


16-1276 




Ar\rM i7 
AOPW^ 


- 


000000 


16-1276 




ADD Wo 




000000 


16-1276 




ADDwV 




000000 


16-1276 




ADt VC 1 




000000 


16-1276 


16-1276 


ADb vn 




CXKXXX; 


16-1276 








001 5^0 


#16-1276 


•26-1641 








102-3465 


102-3466 


A C Al\ 1 

AtNV 




000000 


16-1276 


16-1276 


AC AJXJM 

AtNvn 


— 


000000 


1^-1276 


16-1276 


A r A T Al 

Af I AL 




000000 


.6-1276 


16-1276 


AMAPhD 1 

AnADH 1 




000000 


16-1276 




AlMAr\D 0 

AHAUH/ 




A/\/\/\/\A 

000000 


16-1276 




AnAOHJS 


— 


000000 


16-1276 








AAAAAA 

000000 


16-1276 




AM AMC 1 




AAAAAA 

CXXXXX) 


16-1276 




AiAAMC O 




AAAAAA 

000000 


16-1276 




AM AMC T 




AAAAAA 

000000 


16-1276 




AMAMC/ 




AAAAAA 

000000 


16-1276 




AMC^ An 




AAAAAA 

000000 


16-1276 


16-1276 


AMCr^l ^ 

AHbUl u 




AAAAAA 

000000 


16-1276 


16-1276 


AMC r X V 




AAAAAA 

000000 


16-1276 


16-1276 


AMT VD1 

An 1 Tr 1 




AAAAAA 

ooouoo 


16-1276 




AMT VDO 

An I Jrc 




AAAAAA 

000000 


16-1276 




AMT VDT 

Ani Tr5 




000000 


16-1276 




AMT VD/ 

An 1 Tr«» 




000000 


16-1276 




ADAC C 






16-1276 


16-1276 


AOC 1 /^D 

AP« JUk 




000000 


16-1276 




ADT r CI 1 

API L5U 




000040 


91-3333 


#92-3335 


ADTC AAi 
AP ItNV 




000001 


86-^219 


91-3333 


APTC 1 7 
W 1 3 J £ 




000200 


53-1838 


#92-3335 


APTSPO 




000100 


91-3335 


92-3335 


APTTST 




027224 


74-2714 


74-2716 


ASbJREG 




000000 


16-1276 


16-1276 



J5 PAGE 1 
SEQUENCE 137 

CREf V01 



H 11 



•27-1655 •28-1677 •29-1701 •29-1720 •39-2009 •39-2029 102-3451 



27-1656 28-1678 ^29-1 700 •29-1722 •39-2008 •39-2031 102-3451 



92-3335 #92-3335 

#92-^535 
#75-2742 



CUKTAB 

SY««X 

AtESTN 

AUNIT 

AUSUR 

AVECT1 

AVECT2 

BADPC 

BITO 

BITOO 

BPOl 

BIT02 

BIT03 

BIT04 

BIT05 

BIT06 

B1T07 

BIT08 

BIT09 

Bin 

BITIO 
BIT11 
BIT12 

Bins 

BITU 

BIT15 

BIT2 

BIT3 

BIT4 

BITS 

BIT6 

BIT7 

BITS 

BIT9 

BPTVEC 

CKSUR 

CLEANU 

CLRREG 

CMSG 
CNTRLC 
CPSAVE 
CPUERR 

CPUEXP 

CR 
CRLF 

OA r AND 
DATAOR 

00 ISP 
0F1 



CREATED BY MACRO ON 23-APR-81 AT 
CROSS REFERENCE 



13:35 PAGE 2 
SEQUENCE 1 38 

CREF vO^ 



I 11 



1 1 if 

U.UE 


RcFtHtNCES 








000000 


16-l<:^o 


1 97<i 






000000 


1 o-l £/^0 


1 O- \cfo 






000000 


io~lc/^o 


1 57A 
lO— IcfO 






000000 


1 D-1 c/^O 








000000 


IX. 10 7X. 

1 o-l c/^o 








001 iCH 






"f f~J\JC'* 




000001 


m\ D-1 1 W 






fll-'^PI 7 
OJ JC 1 f 


000001 


# 1 J— 1 1 TT 


1 C_1 1 OO 

1 5— 1 1 yy 


{1C7P1 7 
O J JC 1 ' 


00000^ 


«1 C_1 1 OO 

wi J- 1 1 yy 


1 CI 1 OO 

1 J— 1 1 yy 






00000*» 


• 1 5—1 1 OO 


1 C— 1 1 OO 

1 J — 1 1 yy 






00001 U 


M\ C1 1 OO 


1 1 1 OO 

1 J 1 1 yy 






OOOUcU 


«1 1 OO 


1 ^—1 1 OO 

1 J 1 1 yy 






OOOU*»U 


«1 1 1 OO 


1 ^—1 1 OO 
1 J— 1 1 yy 






OOOIUU 


«1 C1 1 OO 


1 1 OO 

1 3— 1 1 yy 






OOOcOO 


«1 C1 1 OO 


1 ^—1 1 OO 

1 J— 1 1 yy 






OOOsOO 


*i >— 1 lyy 


1 C1 1 0O 

1 3— 1 1 yy 


actpi 7 

Oj— JC 1 ' 


RA-'^PIQ 
oo JC 1 y 


001 Ww 


«1 C_1 1 GO 


1 C1 1QQ 

1 J 1 lyy 


OJ JC 1 f 




C1 100 
w 1 3~ 1 1 yy 










w 1 3~ 1 1 yy 


OO jc 1 y 








M\ C1 1 0O 

m \ J 1 1 yy 








Al AAAA 


M^ ci 1 0O 
m \ J 1 1 yy 








\Jc\AAA} 


Ml C_1 1QQ 


HO C 1 —J 


RA-^P10 

OO JC 1 7 




A/ A/VV> 


*1 ^—1 100 

w 1 J 1 1 yy 


/P.PPAQ 

••o ccuy 


Oj JC 1 f 






Ml C.I lOQ 

m 1 J— 1 1 yy 


•to C 1 Jt 


AA-P10S 
HO c 1 — J 






W 1 \ 1 










W \ J \ 1 










«1 C.I 10Q 

m I J" 1 1 yy 


1 ^-1 Pin 


77-P01 1 

1 f CT 1 1 


77-P0A1 

f 1 C TO 1 




Ml C.1 1 OQ 

w I J— 1 1 yy 








AAA 1 AA 


w 1 j~ 1 1 yy 


1 "^-l P1 1 






AAn5<V4 


w 1 J 1 1 yy 


T^-1RS^ 

J J 1 Oj J 


7S-P7AS 

f J— C f J 






M^ ^-1 1QO 
w 1 J 1 1 yy 


71-?Sftft 
r 1 c JOO 


71-PSOh 

f 1 c J— V 


7?-?APft 

1 C cOcO 


AA1 AAA 


1 100 

If 1 3 1 1 yy 










jti c_i 1 00 

w 1 J 1 1 yy 










7 


OO JC 1 y 


OO JC 1 7 


wyo J jH ' 


\AJccrO 




J 1 C J J J 


JC c jjo 


JJ CJ*«J 




<;o-7'^fl<t 
jy^c JO J 


ou c jyu 


A1 -P'^OS 

o 1 c jyj 


OC C** vU 


UUccOU 


He J 1 Occ 


J 1 C J JJ 


J 1 C JJJ 


JC C J JO 




C«;— 


J J C J JJ 


jO c JJO 


SA— PTSfl 
jO c J JO 


A7^777 


yu jjcU 


wtV/— jjj 1 






A7^5AA 


oy J J 1 J 


SO— TT1 «; 

oy— jj 1 J 


wyv J J 1 o 






• Hl-'^PI 7 


OJ JC 1 1 


*0J JC 1 f 


*RA-^P10 

"OO JC 1 7 


\ ( ( ( OO 


» 1 J \ C\J 


*PR-1 ARO 

"co 1 ooy 


^fi-i 7sn 

JU I ' J\J 


*^fl-1 7S7 

* jV \ f jI 






inp-'^AA7 

1 Uc J*»*» I 






fun T'l^ 


* 1 0 1 c f O 


TA_1 7Cp 

jU— I f JC 


x(^—^ 7SA 

jV^ I f J*i 


*7A-PR^1 
" f O CO J 1 




« 77-P009 


'If J\J\J 1 






00001 S 


#15-1199 


91-3333 


91 -3333 




000200 


#15-1199 


33-1839 


33-1839 


91-3333 




101-3A16 


101-3A19 


101-3A23 


101-3429 


001310 


#16-1276 


*26-16A0 


27-1658 


28-1682 


001306 


#16-1276 


•26-1636 


*27-1657 


*28-1681 


177570 


#15-1199 


16-1276 


33-1838 




046534 


17-1282 


18-1363 


20-K56 


22-1556 



86-3219 86-3219 



72-2645 74-2703 76-2799 77-2939 



54-2348 
52-2338 



86-3219 
•33-1852 



55-2353 
53-2343 



88-3313 
•33-1855 



•76-2846 * 76-2856 



91-3333 

101- 3432 

102- 3465 
102-3465 



101-3404 

101- 3438 

102- 3466 
102-3466 



56-2358 
53-2343 

76-2871 
•76-2865 



101-3406 
101-3440 



57-2375 
54-2348 

•76-2891 
•77-2967 



58-2380 
54-2348 

77-3008 
•77-2982 



101-3408 101-3413 



22-1574 #103-3480 



CRFATED BY MACRO OM 23-APR-81 AT 



SYWOL 


CROSS REFERENCE 










VALUE 


REFERENCES 






DF10 


046560 


18-1324 


#103-3484 


#103-3485 


DFII 


046565 


18-1331 


1"-1395 


DF12 


046572 


18-1338 


#103-3486 




DF 16 


046600 


#103-3487 




19-1413 


DF2 


046541 


17-1288 


18-1369 




21-1543 


#103-3481 




DF20 
DF24 


046606 


18-1376 


19-1388 


#103-3488 


046616 


19-1401 


21-1499 


#103-3489 


DF3 


046551 


17-1294 


17-1300 


17-1306 






19-1425 


19-1432 


22-1549 


DF32 


046620 


20-1437 


#103-3490 




DF 33 


046626 


20-1443 


#103-3491 




DF43 


046636 


21-1493 


#103-3492 




DF7 


046555 


18-1317 


18-1344 


20-1468 


0H1 


043023 


17-1280 


#101-3400 




DHiU 


043272 


18-1321 


#101-3404 




0H11 


043372 


18-1328 


19-139? 


#101-3406 


L^H12 


043512 


18-1335 


#101-3408 




DH13 


043652 


18-1342 


#101-3410 




OHU 


043702 


18-1348 


#101-3411 




0H15 


043742 


18-1354 


#101-3412 




0H16 


044002 


18-1360 


#101-3413 




DH17 


044103 


18-1367 


#101-3415 




0H2 


043103 


17-1286 


19-1411 


#101-3401 


DH20 


044164 


18-1373 


#101-3416 




DH21 


044312 


19-1379 


19-1417 


#101-3418 


DH22 


044352 


19-1385 


#101-3419 




DH24 


044470 


19-1399 


21-1497 


#101-3421 


DH5 


043202 


17-1292 


17-1298 


17-1304 


[)H30 


044510 


19-1423 


#101-3422 




DH31 


044550 


19-1429 


#101-3423 




DH32 


044667 


20-1435 


#101-3425 




DH33 


044767 


20-1441 


#101-3426 




DH34 


045037 


20-1447 


#101-3427 




DH36 


045057 


20-1460 


#101-3428 




DHAO 


045126 


20-1472 


#101-3429 




DH41 


045164 


20-1479 


21-1521 


#101-3431 


DH42 


045225 


20-1485 


21-1527 


21-15<0 


Om3 


045327 


21-1491 


21-1534 


#101-3434 


DH45 


045357 


21-1503 


#101-3435 




DH46 


045407 


21-1509 


#101-3436 




DMA 7 


045436 


21-1515 


#101-3437 




DH54 


045502 


22-1546 


#101-3438 




OH55 


045562 


22-1553 


#101-3440 




DH56 


045662 


22-1560 


#101-3442 




0H57 


045712 


22-1566 


#101-3443 




0H60 


045752 


22-1572 


#101-3444 




0H7 


043242 


18-1315 


#101-3403 




DISPLA 


001142 


*1 6-1 276 


•33-1838 


•33-1838 


DISF»Rt 


000174 


#15-1273 


33-1838 




osyp 


= 177570 


*15-1199 


16-1276 


33-1838 


DTI 


045762 


17-1281 


#102-3447 





13:35 PAGE 3 
SEQUENCE 139 

CREF V01 



20-1481 



J 11 



20-1488 21-1517 



17-1312 18-1350 18-1356 
22-1568 #103-3482 



21-1523 21-1530 21-1536 
19-1381 19-1407 19-1419 



20-1468 20-1475 21-1505 21-1511 22-1562 #103-3483 



17-1310 19-1405 #101-3402 



CKKTAB 


CREATED BY 


HACRO ON 23-APR-81 AT 


SYMBOL 


CROSS REFERENCE 






SYMBOL 


VALUE 


REFERENCES 




DT1C 


046044 


18-1323 


#102-3451 


0T11 


046060 


18- 1350 


19-1394 


0T12 


046074 


18-1337 


Mi AO 7/ C T 

#102-3453 


DTK 


046112 


18-1349 


Ml AO 7/ C/ 

#102-3454 


DT15 


046124 


18-1355 


oo 1 CZ.7 

22-1 56/^ 


DT16 


046136 


18-1362 


Ml AO 7/ 

#10^-3456 


DT17 


046152 


18-1368 


Ml AO 1/ C7 

#1 02-345 r 


Dr2 


046000 


17-1287 




0T20 


046170 


18-1375 




0T21 


046212 


in 1 70A 

19-1380 




OT22 


046224 


in i 707 

19-1387 


Mi A*i 7/ ^A 

#102-3460 


DT24 


046246 


1 fi 1 / AA 

iy-i4<>0 


oi 1 / oo 
21-1498 


DT25 


046254 


19-1406 


MlAO T/ZO 

#10c-346c 


DT27 


046266 


19-1418 


«1 A0_1/ iLI 

#1 Oc-3463 


DT3 


046022 


1 f-\dy5 


17 1 OOO 

1 /'-lc99 


0T30 


046300 


19-14c4 


*1 AO_T/ il/ 

#1 0c-3<»6*» 


0T31 


046312 


19-1431 


#10<:-3465 


OT32 


046330 


20-1436 


Mi AO T/ iL.iL 

#1 Oc-3466 


OT33 


046352 


OA i / / 1 


Ml AO 1/ iL7 

#10^-346 


DT35 


'•046366 


•OA i / CC 


Ml AO— T/ ZB 

#1 Oc-3468 


DT37 


046376 


OA i / 

20-1 46f 


Ml AO_1/ ZO 

#1 Oc-3469 


OKI 


046412 


OA i / OA 

20-1400 


oi _i coo 


0TA2 


046424 


«?0— l*»Cf 


c1-l5c9 


OT5i3 


046440 


01 _i / Q'J 

21-149^ 


cl—1 535 


0T45 


046450 


21-1304 


*1 A0_7Z77 

#10^-34/^3 


or47 


046460 


il-1516 


m]\JC~JHfH 


DT5A 


046472 


00—1 ^/.fl 


m 1 Uc 3*» f 5 


DT55 


046504 


00_1 c 


#lUc-3«»^6 


DT56 


046520 


CC-1361 




0T6O 


046530 


00_1 C7T 


#1 Uc— 3m fo 


0T7 


046034 


lB-1 j16 


IB 1 7/ t 

1 8-1 343 


OUALAO 


002334 


1Z.CT 

»cr-1633 


CI —OIVT 

51-^333 


EMTVEC 


= 000030 


«1 C_1 1 oo 
ml 5-1 199 


"33-1838 


Eni 


037460 


1 7—1 07Q 


#100—3353 


Emo 


. 040055 


1 0_1 lOrt 

lo-l JcO 


#100—3360 


Emi 


040121 


Ifl 1T07 


#100-3361 


W2 


040161 


IB 1 HZ 

lo-l jj4 


#1 00-336C 


E«13 


040230 


IB 1 T/ 1 

18-1341 


#1 00-3363 


EMU 


040265 


1 O 1 Ty 7 

18-1 54 


#1 00-3364 


Ems 


040321 . 


IB 1 TCT 

18-1353 


#100-3365 


EH16 


040360 


1 B_1 ICQ 

18-1359 


#100—3366 


EH17 


040427 


1 B_1 

18-1366 


Ml AA_'?TA7 

#100-336^ 


En2 


037520 


17 1 OflC 

1 f-ICOD 


#1 AA_7TCZ 

#100— 335*» 


EM20 


040505 


1 fl— 1 X70 


M^ AA— TTAfl 
If 1 UU— 3360 


Efl21 


040557 


1 Q_1 77B 

19-13/^8 


#1 00-3369 


EH22 


040612 


1 Q 1 7fl/ 

19-1384 


*1 AA_117A 

#100-33^0 


EH23 


040670 


1Q.1 7gi 

1 7 1 J7 1 


#100-3371 


EH24 


040726 


19-1398 


#100-3372 


EH25 


041004 


19-1404 


#100-3373 


En26 


041055 


19-1410 


#100-3374 


EM27 


041115 


19-1416 


#100-3375 


E«3 


037567 


17-1291 


#100-3355 



13:35 PAGE 4 
SEQUENCE 140 

CREF V01 



#102-3452 
#102-3455 
#102-3448 



•C 11 



#102-3461 



17-1305 17-1311 #102-3449 



#102-3470 

21-1542 #102-3471 
#102-3472 



20-1474 
52-2338 
*33-1838 



21-1510 #102-3450 
53-2343 54-2348 



55-2353 56-2358 



L 11 



CKKTAB 


CREATED BY 


MACRO ON 23-APR-81 AT 


13;35 


PAGE 5 
















SEQUENCE 141 












SY«a 


CROSS REFERENCE 








CREF V01 












SYMBa 


VALUE 


REFERENCES 


#100-3376 
















E«30 


(K1171 


19-1422 
















EM31 


(K1231 


19-1428 


#100-3377 
















EM32 


(K1273 


20-1434 


#100-3378 
















EM33 


(K1335 


20-1440 


#100-3379 
















EM3A 


04U01 


20-1446 


#100-3380 
















En36 


04U72 


20-1459 


#100-3381 
















Em 


037626 


17-1297 


#100-3356 
















EM40 


041561 


20-1471 


#100-3382 
















En41 


041644 


20-1478 


#100-3383 
















E««»2 


041725 


20-1484 


#100-3384 
















EM43 


041775 


21-1490 


#100-3385 
















En44 


043053 


21-1496 


#100-3386 
















EM45 


042126 


21-1502 


#100-3387 
















En46 


042175 


21-1508 


#100-3388 
















EM47 


042250 


21-1514 


#100-3389 
















EMS 


037661 


17-1303 


#100-3357 
















EM50 


042306 


21-1520 


#100-3390 
















EM51 


042367 


21-1526 


#100-3391 
















EM52 


042447 


21-1533 


#100-3392 
















EM53 


042525 


21-1539 


#100-3393 
















EM54 


042560 


22-1545 


#100-3394 
















EM55 


042615 


22-1552 


#100-3395 
















EM56 


042654 


22-1559 


#100-3396 
















EM57 


042720 


22-1565 


#100-3397 
















EM6 


037734 


17-1309 


#100-3358 
















Eli60 


042765 


22-1571 


#100-3398 
















EM7 


040017 


18-1314 


#100-3359 














54-2348 


ERRCNT 


001322 


#16-1276 


51-2333 


51-2333 


52-2338 


52-2338 


53-2343 


53-2343 


54-2348 


55-2353 


55-2353 


56-2358 


56-2358 


57-2375 


57-2375 


58-2380 


58-2380 


59-2385 






59-2385 


60-2390 


60-2390 


61-2395 


61-2395 


62-2400 


62-2400 


102-3464 


102-3465 






102-3466 


















ERROR 


= 104000 


#15-1199 


27-1661 


27-1663 


28-1685 


28-1687 


30-1756 


31-1786 


35-1875 


36-1898 


37-1924 


37-1937 


38-1966 


38-1980 


39-2020 


39-2024 


40-2042 


40-2046 


41-2053 






41-2057 


42-2064 


42-2068 


43-2075 


43-2079 


44-2086 


44-2090 


45-2097 


45-21 ni 






46-2120 


46-2129 


46-2141 


46-2150 


47-2173 


48-2201 


48-2206 


48-221 5 


48-22*: 5 






48-2236 


48-2249 


48-2261 


48-2274 


49-2292 


49-2299 


49-2308 


49-2313 


51-2333 






51-2333 


52-2338 


52-2338 


53-2343 


53-2343 


54-2348 


54-2348 


55-2353 


55-2353 






56-2358 


56-2358 


57-2375 


58-2380 


59-2385 


60-2390 


61-2395 


62-2400 


63-2412 






63-2412 


64-2417 


64-2417 


65-2422 


65-2422 


66-2427 


66-2427 


67-2432 


67-2432 






68-2437 


68-2437 


69-2466 


70-2503 


70-2514 


70-2525 


70-2536 


70-2547 


70-2558 






71-2593 


72-2634 


72-2652 


74-2709 


75-2751 


76-2794 


76-2804 


76-2813 


76-2838 






76-2852 


76-2864 


76-2878 


76-2888 


77-2934 


77-2944 


77-2955 


77-2974 


77-2988 






77-3000 


77-3015 


77-3025 


78-3096 


78-3156 


80-31 72 


80-31 72 


80-31 72 


81-3178 






81-3178 


81-3178 


82-3185 


82-3185 


82-3185 


83-3208 








ERRTYP 


033626 


86-3219 


#88-3221 










•28-1689 


•28-1689 


•28-1689 


ERRVEC 


= 000004 


#15-1199 


28-1689 


28-1689 


•28-1689 


•28-1689 


•28-1 689 


•28-1689 


•28-1689 


33-1838' 


•33-1838 


•33-1833 


•33-1842 


•33-1843 


•75-2747 


•76-2776 






•76-2827 


•77-2916 


•77-2962 


•83-3202 


•83-3212 


85-3217 


•85-321 7 


•85-321 7 


•85-3217 


FORMPA 


003426 


#32-1808 


78-3095 


78-3152 










98-3347 


98-3347 


GNS 




15-1273 


15-1273 


33-1839 


84-3215 


84-3215 


98-3347 


98-3347 




98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 






98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 



M 11 



CKKTAB 




CREATED BY 


MACRO ON 23-APR-81 AT 


13:35 


PAGE 6 




















SEQUENCE 142 












SYI«OL 


CROSS REFERENCE 








CREF V01 












SYMBOL 


VALUE 


REFERENCES 
























98-3347 


98-3347 
















GTSUR 


— 


10A407 


33-1839 


90-3327 


#98-3347 














HOUFLA 




001340 


#16-1276 


•75-2742 


•75-2753 


76-2771 


76-2783 


76-2824 


77-2912 


77-2922 




HOLFLG 




001 336 


#16-1276 


•76-2775 


76-2790 


•76-2795 


76-2811 


76-2882 


•76-2885 


•76-2890 


•77-2917 






77-2930 


•77-2935 


77-2953 


77-3019 


•77-3022 


•77-3027 








HT 




000011 


#15-1199 


91-3333 


91-3333 














IBSAVE 




03362A 


*86-3219 


86-3219 


•86-3219 


•86-3219 


86-3219 


86-3219 


86-3219 


86-3219 


#86-3219 


lOTVEC 


- 


000020 


#15-1199 


•33-1838 


•33-1838 














KDPARO 


- 


172360 


#15-1200 


















KDPAR1 


- 


172362 


#15-1200 


















KDPAR2 


- 


172364 


#15-1200 


















K0PAR3 


- 


172366 


#15-1200 


















KDPARA 


- 


1 72370 


#15-1200 


















KDPAR5 


- 


1 72172 


#15-1200 


















KDPAR6 


- 


1 72374 


#15-1200 


















KDPAR7 


- 


1 72376 


#15-1200 


51-2333 


51-2333 


57-2375 


59-2385 










KDPORO 


- 


1 72320 


#15-1200 


















KDP0R1 


- 


172322 


#15-1200 


















KDPDR2 


- 


172324 


#15-1200 


















KDPDR3 


- 


172326 


#15-1200 


















KDPDR4 




172330 


#15-1200 


















KDPDR5 




172332 


#15-1200 


















K0PDR6 


- 


172334 


#15-1200 


















KDPDR7 


— 


172336 


#15-1200 


54-2348 


54-2348 


60-2390 












KERSTK 


- 


001100 


#15-1212 


38-1956 


38-1962 


38-1964 


71-2597 


83-3204 








KIPARO 




172340 


#15-1200 


28-1689 


32-1808 


40-2041 


51-2333 


51-2333 


51-2333 


51-2333 


51-2333 








57-2375 


59-2385 


63-2412 


•63-2412 


63-2412 


63-2412 


63-2412 


70-2481 


70-2509 


K I PARI 


— 


172342 


#15-1200 


•74-2690 
















ICIPAR2 


- 


172344 


#15-1200 


•74-2691 
















KIPAR3 




172346 


#15-1200 


•72-2619 


•74-2692 


80-3172 












KIPAR4 




172350 


#15-1200 


•72-2620 


•74-2699 


•76-2777 


•76-2806 


•76-2829 


•76-2847 


•76-2858 


•76-2859 








76-2874 


•77-2918 


•77-2946 


77-2949 


•77-2963 


•77-2983 


•77-2994 


•77-2995 


77-3011 








*78-3056 


•78-3115 


•78-3136 


102-3457 


102-3474 










KfPARS 


- 


172352 


#15-1200 


•76-2778 


76-2785 


76-2792 


•76-2807 


76-2809 


76-2884 


•77-2919 


77-2924 








77-2932 


•77-2947 


77-2951 


•77-2964 


77-3021 


•78-3057 


•78-3116 


•78-3137 




KIPAR6 


— 


172354 


#15-1200 


















KIPAR7 




172356 


#15-1200 


28-1689 


•72-2621 


•74-2693 












KIPDRO 




172300 


#15-1200 


41-2052 


54-2348 


54-2348 


54-2348 


54-2348 


54-2348 


60-2390 


66-2427 








*66-2427 


66-2427 


66-2427 


66-2427 


70-2480 


70-2498 


71-2578 


•71-2586 


74-2687 








80-3172 


80-3172 


80-3172 












KIP0R1 




172302 


#15-1200 


















KIP0R2 




172304 


#15-1200 


















KIP0R3 




172306 


#15-1200 


*72~2622 


•72-2640 


•83-3201 


83-3205 










KIP0R4 




172310 


#15-1200 


*72-2625 


•78-3113 


•78-3132 












KIP0R5 




172312 


#15-1200 


•78-3114 


•78-3133 














KIPDR6 




172314 


#15-1200 


















ICIP0R7 




172316 


#15-1200 


*72-262^ 
















KSP 


=1000006 


#15-1207 


•25-1622 


•25-1626 


•27-1654 


•28-1676 


•29-1713 


•30-1748 


•30-1749 


30-1751 








•30-1759 


•30-1760 


•31-1779 


•31-1780 


31-1781 


•31-1788 


•31-1789 


•33-1841 


•38-1956 








38-1962 


38-1965 


•38-1972 


•39-2023 


•71-2597 


•76-2869 


•76-2870 


•76-2892 


•76-2893 








•77-3006 


•77-3007 


•77-3029 


•77-3030 


•78-3146 


•78-3147 


•78-3161 


•78-3162 


•83-3204 








•88-3222 


•88-3251 


•88-3276 


88-3278 


•88-3279 


•88-3283 


•88-3284 


•88-3290 


88-3292 





CRrAicD BY 


MACRO ON 23-APR-81 AT 


13:35 


PAGE 7 


AJ 11 

Nil 


















SEQUENCE 143 














CROSS REFERENCE 








CREF V01 














VALUE 


REFERENCES 






•88-3303 
















*88-3293 


♦88-3296 


♦88-3297 


*QO_77A^ 

•oB-330h 










LF 


= 0000 le 


#15-1199 


91-3333 


91-3333 














LOOP 


OcOhSs 


*33-1840 


84-3215 
















HGntRR 


Ca}3330 


28-1689 


#31-1771 


33-1844 


71-2599 














0Ojj3c 


#31 -1 772 


♦31-1787 


♦33-1848 
















- IffJfd 


#15-1203 


♦33-1850 


♦38-1954 


•48-2195 


»»0— ccUo 


•«iO-cclO 


«tO-^^10 


**o~dddo 


40-<:^3y 






48-2254 


48-2267 


•48-2277 


•74-2703 


*7/._07AiL 


*7iL_077A 








WW 1 


= IffDf'* 


#15-1204 


48-2192 


















= 177576 


#15-1205 




















= ir^aio 


#15-1206 


♦33-1851 


49-2287 


•77-291 1 




•77_7AA7 








mVcC 


= 000<:50 


#15-1200 
♦71-2600 


♦28-1689 
♦72-2625 


♦28-1689 
♦72-2639 


•33-1844 
♦78-3085 




71 —OQBO 


*71 _0CB7 


*71 .0C07 

•r l-<?303 


»71 OCOO 

♦^i-^3yy 


OLDPC 


001 j<:0 


#16-1276 


♦27-1654 


27-1664 


♦28-1676 


0B_1 iLBB 
CO 1 Ooo 


•r^o-cooy 


* fo~cofo 


7i; 0BB7 


^7^ ODOD 

♦ r o-^ooy 






76-2893 


♦77-3006 


♦77-3013 


77-3024 


*77— 7A5A 


77_7A7A 








ULUrb 


00 1 jjO 


#16-1276 


♦76-2870 


76-2892 


♦77-3007 


77—7050 










PARCuU 


00*:*»00 


#28-1675 


57-2375 


58-2380 


59-2385 


oO-cjVO 


ol-eoya 


OC-C400 






O ADT AD 

rw 1 ^ 


AA1 

001 JJO 


#16-1276 


69-2456 


69-2462 


69-2465 














AA1 71 Z 
001 jl*» 


#16-1276 


♦26-1642 


28-1680 


102-3466 












DA TDAlC 




74-2696 


#75-2719 
















DAT TOD 


AA1 T1 O 

001 jlc 


#16-1276 


♦26-1638 


•28-1679 


102-3466 












DDALi t 


001 jOh 


#16-1276 


•32-1831 


















rtAI 1AO 

001 jOc 


#16-1276 


•32-1822 


•32-1823 


•32-1828 


1 OC— JHJO 


1 AO_7Z.^A 








D^DI ICD 


001 


#16-1276 


•30-1750 


30-1754 


•76-2782 


rO— Cf 00 


*7A— 3B70 

•f o-cOjc 


7iL— 9B7A 

f O— c03O 


*7iL_0BC7 

•ro-i03r 


f o-cool 






•76-2871 


76-2872 


76-2880 


•77-2926 


77_309B 


*77_9aQ7 


77_0007 


*77_7AAB 

• r f^-3000 


77_7AAO 

f r-300y 






77-3017 


















DC c rr\c 


A7/ OAA 


88-3309 


#88-3314 
















DC C rfSLt 

rr ttun 


A7/ OOA 


88-3309 


#88-3311 
















DccrrvT 
rF CCD 1 


AT/. O^A 


88-3309 


#88-3313 


















AT/. 1 AA 

Uj*» loo 


88-3309 


#88-3310 
















DC c rue 
rr ttWb 




88-3233 


#88-3309 
















D f DA 




#15-1199 


















D 1 Dm/c 


— AAAOZ A 

- OOOchO 


#15-1199 


















DDA 


- AAAAAA 

- 000000 


#15-1199 


















DD1 

rK 1 


- UOOOhO 


#15-1199 


















DDO 

rK^ 


— AAA1 AA 

- OOOlOO 


#15-1199 


















DD7 


— AAA1ZA 

- 0001 hO 


#15-1199 


















DD/ 


- OUOcOU 


#15-1199 


















DDC 


- AAA5Z.A 
= 000c*»0 


#15-1199 


















DD4^ 


- AAATAA 

- 000300 


#15-1199 










i 








DD7 


AAA 7/. A 

- OOOjmO 


#15-1199 


















DC 

Pb 


- 1 7777A 


#15-1199 


15-1199 
















rbW 


- 1 7777A 


#15-1199 


23-1586 


23-1588 


32-1809 


79_1 B1 7 

Jc-lol J 


*7C— 1 B7A 
♦j3- lOf 0 


7C_1 B71 

33-1 of\ 


*7A_1 BQ1 

•3o-ioy 1 


*7A_1 BOO 

♦5o— 1 oy^ 






36-1893 


♦36-1897 


•36-1905 


•37-1915 


*77_1 Q1 7 


77_1 Q1 B 

3r-iyio 


*77— 1 Q'iX 

*Jt~ iyc3 


*77_1 QOQ 


*77_1 Q71 

♦3/^-iy3i 






37-1932 


•37-1936 


•38-1955 


•38-1957 


*7B_1 OCQ 


*7fi_1 OA1 

•30-1 Vol 


*7B_1071 

•30— \yi 1 


*7B— 1Q77 
•30— lyf 3 


*7B— 1 Q75 

♦30— lyf 3 






♦38-1977 


•38-1981 


•39-2003 


•47-2168 


*/.7_31 7A 


*Z,7-31 7B 
••• f — C 1 f 0 


•hO— cc3c 




■••0— CCf O 






♦78-3053 


78-3086 


78-3107 


•78-3117 


r 0-51 ly 


*7fl_71 OO 

•ro— 3icy 


•rO— 3131 


*B1_71 77 
•01—31 f f 


*B1 _71 70 

•0 1 3 1 f y 






♦82-3184 


•82-3186 
















rWKnau 


A77Z 1 A 

yjif* lO 


99-3349 


#99-3350 
















DLJDl/Cr 


- OvOOcH 


#15-1199 


*33-1838 


•33-1838 


•99-3349 


*QO_77Z.O 

•yy— jjhv 


*Qa_77Z.O 

•yy— 33*»y 


*00— 77/.0 

•yy— 33*«y 


*yy-33Hy 


•yy— 33My 




= 10^411 


89-3315 


#98-3347 
















RDLIN 


= 104412 


#98-3347 


















REAOON 


001342 


#16-1276 


48-2229 


48-2241 
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SEQUENCE 144 

SYWOL CROSS REFERENCE CREf VOI 



SVWGL 


VALUf 


REFERENCES 


















RESREG 


— 


104'f14 


97-3345 


#98-3347 




^77 i O 70 

•33-1 030 












RESVEC 




000010 


#1 5-1 199 


* 33- 1838 


33-1838 












RHIREG 




1 77770 


*1 5-1216 


75-2748 


^7^ OOAA 


• fb-dodo 


A.77 OQ/ A 










W» 




X000006 


#15-1199 


* 33- 1838 


•33-1 030 


11 1 070 

33-1 03O 












R7 




X000007 


#1 5-1179 


















SAVREG 


— 


104413 


Q7 11/ C 






■^7-1 01 
jr 1 7 1 J 


70_1 OCT 

JO 1 yjj 




£.0-3070 

HU— Cl/J 7 






SCOPE 


— 


000004 


» 1 5-1 1 yy 


TC — 1 AAA 


30 1 300 


10-3003 


/ 1-OACA 






/ 7_0n70 


/ / _0Afi7 
H'*~d\JOJ 


zc-onoz. 

••3-cUth 


hO c 1 1 *• 


A7-31 A7 
•»/ — C 10' 


*»0— C 1 7 1 


AO— 33BA 




^3-3777 
3c c33' 








C7_0T/. 0 


C/ _07Z.7 


?Q-37^3 
>3-c33c 


30-<:33f 


«;7-377A 
3f c3f *» 


30 c3f 7 


37— c jO*» 


AO-3TR0 
OV^c jOt 


<»1 -37QA 
0 1 c3t*i 










i^T— 0Z.1 1 


<L/.— 3Z.1 A 


03— cnc 1 


AA.3A3A 
OO cHcO 


A7-3A71 
Of c*»j 1 


OO c*»jO 


AO-3A^1 
Ot^cHJ I 


70-3A 7R 
/ U— c*» ' O 








71 OC7iL 


fd''dO\ O 


rn— eOr H 


7/L— 37AB 
f 0 c ' Oo 


77— 30nB 
f f ctUO 


f O— 3U3c 


Bn-71 71 

OU 3 1 f 1 


B1— 71 7A 
0 1—3 1 'O 


B3-71R7 
Oc 3 lo3 








QT—H Q7 


fi£-T31 ^ 
OH-3e 1 3 
















5DPAR0 




1 72260 


M1 C 1 OAA 


















SOP AH 1 




1 fZctc 


#1 o/v> 
#1 5-1 cUO 






















i 70^Ay 


#15-1200 






















1 fccot 
























1 7007A 


w 1 3— 1 cUU 






















1 fccTc 




















5DPAHO 






* 1 D— 1 cUU 






















1 f dcfn 


* 1 3- 1 /^UU 


C3-37'^S 
3c c330 


C3-3TTS 
3c c330 


^B-3TRn 
30 c JOU 














— 


1 72220 


* 1 J- 1 cUU 

M1 C_1 ■>AA 

#1 D-lcUO 


















SDPDR 1 




1 ficcc 


















SDP0R2 




1 feci'* 


#1 D-1 cUU 


















SDPDR 3 




1 7000iL 

1 f dcco 


* 1 J— 1 £UU 




















~ 


1 70010 

1 f cc5\j 


W 1 3 1 cW 


















cr\or\D s 
iDPUK J 


*~ 


1 700T0 


W 1 J 1 cUv 


















SDPDRO 




1 7007/ 


» 1 J— 1 cUU 


















cr\Dr\D 7 
.SDrDH r 


— 


^ 700T^ 
1 fCCJO 


# 1 J— 1 cUU 


33— cj3j 


33— c333 


0 1 — CJ7J 












C I DA DA 




1 7O0/ O 


If 1 J" IcUU 


3c 1013 


••c cU03 


C3.3HB 
3c c33o 


3c c3jO 


3c c jjO 


3c c jjO 


'i3-P77R 
JC c3jO 


^R-37RO 
30 c JOU 








*AZ,— 3Z,1 7 


AA— 3A1 7 
O** c*» ' ' 


OH— cH 1 ' 


AA— 3^1 7 
OH— CH 1 f 


f V cHOf 


70-3S71 


7R-7nS0 




C T DAD1 

blrAKl 




y722t*2 


#13—1 cUO 


















SIPAR2 




1 72244 


#l3-lcOU 


















SIPAR3 




1 700/ X. 


#15-1200 


81-3178 
















C T DAD/ 




1 700CA 
1 fddO\) 


W 1 D— 1 cUU 


*7S— THAI 


*7li— 11 31 
* f O J 1 c 1 


" f O J 1 MU 












C T DADC 




1 tddid 


W 1 D— 1 cUU 


•r o— jUoc 


" f o— 3 1 cc 


•7B— 71 AI 

" f O— J 1 H I 
















^ 700C/ 
1 rdd^** 


w 1 J— 1 cUU 


















C T DAD7 




1 f ddob 


* 1 J 1 cUv 
















Of CHJC 


C T Dr\DA 

5IPDHU 


■*" 


1 rdcyJt 


» 1 J— 1 £UU 




33— C333 


33— c333 


33— c333 


33 c333 




A1-370^ 




O 1 J 1 f o 


A7— 3Z>73 
Of c*»Jt 

S1_71 7a 
O 1 —3 1 f 0 


Or CHJC 


Of c*»3c 


f U cHOO 


70- 3 S 30 
r U cPcU 


7A-3A7R 

f H— cOr O 


7R-70A0 
f O jvOt 


R1-717R 

O 1 J 1 f o 


c r ^tf\Di 




^72202 


#1 j-l^UU 


















SIPDR2 




172204 


#1 3—1 cUO 


















S1P0R3 




1 70oniC 


#15-1200 






















1 f cciO 


#13— IcUU 


*7B_TA77 


*7B-'^1 
"f 0— 3 Ic3 




















#13""lcUU 


•f o— jUfO 


"ro— 31cm 


















1722U 


#15<-1?00 


















S1P0P7 




172216 


#15-1200 


















SRC 




177572 


#15-1200 


15-1203 


28-1689 


•28-1689 


•28-1689 


31-1782 


•31-1785 


39-2006 


46-2115 




*4 7-21 69 
72-2646 


47-2171 
•72-2651 


*U7-2}77 
•78-3083 


•71-2588 
78-3153 


71-2590 
•78-3155 


•71-2592 


•71-2598 


*72-262B 


•72-2645 


SRI 




177574 


#15-1200 


15-1204 


31-1783 








78-3154 






SR2 




177576 


#15-1200 


15-1205 


31-1784 


46-2125 


46-2146 


72-2647 







SY«a 

SYWOL 

SR3 

SSP 

STACK 

START 

3TKLMT 

SUPSTK 



SUREG 

SWO 

SUOO 

SU01 

Sbl02 

SW03 

SUCK 

SW05 

SW06 

SW07 

SWC8 

SW09 

SWT 

SU10 

SU11 

SU12 

SW13 

SWH 

SW15 

SU2 

sy3 

SW5 

sy6 

SW7 

sy8 

SW9 

TBIT 

TBITPS 

TBITVE 

TESTNO 



TIMERR 

TIMFLG 

TIHTST 

TKVEC 

TOFF 

TON 

TONUn 

TPVEC 

TRAPPC 



CREATED BY HACRO ON 23-APR-81 AT 



CROSS REFERENCE 
VALUE 

= 172516 
=X000006 
= 001100 

020000 
= M777t, 
= 000700 

001 UO 



000176 
= 000001 
= 000001 
= 000002 
= 000004 
= 000010 
• 000020 
= 000040 
= 000100 
= 000200 
= 000400 
= 001000 
= 000002 
= 002000 
= 004000 
= 010000 
= 020000 
= 040000 
= '00000 
= J00004 
= 000010 
= 000020 
= 000040 
= 000100 
= 000200 
= 000400 
= 001000 
= 000020 

001272 
= 000014 

001254 



003232 
003234 
003024 
000060 
002172 
002226 
001274 
000064 
001260 



REFERENCES 
#15-1200 
#15-1208 
#15-1199 
15-1273 
#15-1199 
#15-1213 
#16-1276 
85-3217 
99-3349 
#15-1273 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1199 
#15-1210 
#16-1276 
#15-1199 
#16-1276 
102-3454 
102-3463 
102-3472 
29-1726 
#30-1741 
#29-1691 
#15-1199 
#23-1586 
#24-1603 
#16-1276 
#15-1199 
#16-1276 



15-1206 
•38-1958 

15-1212 
#33-1838 

38-1958 
33-1838 
85-3217 
99-3349 
33-1838 

15-119*^ 
15-1199 
15-1199 
15-1199 
15-1199 
15-1199 
15-1199 
15-1199 
15-1199 
15-1199 



23-1586 
♦23-1589 
*33-1838 
*86-3219 
102-3455 
102-3464 
102-3473 
#30-1740 
♦30-1758 
29-1706 

71-2577 
71-2602 
•29-1702 



13:35 PAGE 9 
SEQUENCE 145 

CREF V01 



•28-1689 
•38-1974 
15-1213 
99-3349 



•33-1838 
85-3217 



23- 1591 

24- 1603 
•33-1838 

102-3447 
102-3456 
102-3465 
102-3474 
33-1842 
•33-1847 
40-2040 

72-2617 
72-2642 
29-1707 



39-2015 
48-2253 
15-1214 



33-1838 
86-3219 



C 12 



39-2033 
•48-2254 
33-1838 



•33-1838 
86-3219 



33-1839 89-3315 89-3315 



•48-2255 
33-1841 



•33-1838 
86-3219 



24-1603 
24-1605 

102-3448 
102-3457 
102-3466 
102-3475 
39-2021 



•24-1606 ^33-1 849 



102-3449 
102-3458 
102-3467 
102-3476 
76-2827 



102-3450 
102-3459 
102-3468 
102-3477 
77-2962 



•48-2262 



33-1839 
86-3219 



84-3215 
89-3315 



85-3217 
89-3315 



102-3451 
102-3460 
102-3469 

83-3212 



102-3452 
102-3461 
102-3470 



102-3453 
102-3462 
102-3471 



41-2051 42-2062 43-2073 44-2084 45-2095 



80-3172 
80-3172 
•29-1723 



81-3178 
81-3178 
•39-2010 



82-3185 
82-3185 
39-2018 



83-3198 
83-3214 
•39-2032 



•30-1748 30-1760 *31-1779 31-1789 •72-2649 72-2657 



102-3451 
•78-3146 



78-3162 



CKKTAB 



CREATED BY MACRO ON 23-APR-81 AT 13; 



SYMBOL CROSS REFERENCE 





VALUE 


t%C C CDCU^ c c 

Rcr cRcNCcb 


1 A7— 7AAfl 
IUc-3*»*»o 






1 A'5_7/.A7 

lUc 3h«»^ 


TRAPP5 


001 cbi 


• 1 57A 
*l0~lc'0 


*7A— 1 7AQ 
•3U— 1 f H7 






1 A0_7/.A7 
lUc 3*»M' 


1 A?- 7AAfi 
lUc— 3«»«»0 


TRAPVc 


— /WVMZ. 

= UUU03*» 


#1 C_1 10Q 


*77-1 B7A 
*33- 1 030 


TRTVcC 


— AA/VM / 

= 00(X)1*» 


MA 1 1 OO 

»1 3~ 1 IW 




TCT1 

TST 1 




*33-l000 




TC T 1 A 

Tsno 


A01 / 

021 


#*»t-tUOl 




TC T 1 1 


A*^1 i i r\ 






TCT1 O 


UcImjO 


»*»*»~cUo3 




TC T 1 T 


A11 / 7/ 


c_onoA 




TCT 1 y 

TSTlH 


Ucl 31 <: 


«AA_01 1 A 




TC Tie 

T5T1 J 


A01 iLC/ 


«A 7—91 A7 
mhr^C lor 




T5T10 


A01 71 / 

Ucl l*» 


«Afl_31 Q1 

»*»o~c 1 y 1 




TC T 1 7 


0cc3cU 






TCTO 


UeUO*>c 


»30~ 1 OOO 






A05Z.Z.5 


«C1 .3773 
»3 1 "CJJC 




TCT01 


UccO*»U 


^1 -3777 
3 1 ~c3j3 


#^3-3777 




U23U30 


3c-c33o 


#C7— 37A3 
w33— CJHC 


TCT07 


ATTOTZ. 

Uc323*» 


C7_97A7 


#CA— 77A7 
»3h— CJ**/^ 




Uc3*»3c 


CA— 37AS 
3*»~c3*»0 


#^«»-37«»3 
w3 J c J JC 




Uc303U 


^^_37^7 
33~'c333 


Jf^A-37«»7 
»jO CJJ ' 


1 b 1 CO 


Uc** UcO 


CA— 37^8 
30~c330 


Jf«»7-377A 

If J 1 CJI 


TCT07 


a3z.i An 


^7-377«» 


#<tR-377Q 

ifjOCji" 


TCT7 


\JC\Jf cO 


#77-1 01 7 




1 b jU 


nDZ.D^3 
Uc*»c JC 


<tR-37Rn 
jO c jOU 


#<tQ-3TRA 
^jyCJOH 


1 O 1 J 1 


03Z,7AZ. 




#An-37R0 

»OW C j07 


TCT75 

1 b 1 JC. 


Uc*»3Uc 


OU c J7V 


#A1-370A 

»0 1 C J7*t 


1 b 1 J J 


Uc*»OcU 


A1 -370S 


#A3-3700 

»OC C J77 


1 b 1 J*» 


Uc*»f 30 


A3— 3Ann 

Oc c*»UU 


#A7-3A1 1 
IfOj C* 1 1 


1 b 1 3 J 


A5^fU,3 
Uc3tK»c 


#AA-3A1 A 
»0*» c*f 1 o 




1 b 1 30 


Uc3 1 *»0 


#A^-3A31 
»03~c*»c 1 




TC T 77 

1 b 1 Jf 


n5^3^D 
Uc3c3c 


«AA-3A3A 
wOO c*»cO 




TCTZ. 


n3in^n 

Uc 1 U jU 


«7A-10<tX 

If JO 1 yjj 




TC Tz.n 

1 b 1 hU 


Uc J JjO 


JfA7-3A71 

»0» Cf J 1 




TCTZ. 1 
1 b 1 *» 1 


A5^Z.A5 
Uc3«»Oc 


«Afi-3A7A 
wOO c*»30 




TCTZ.5 
1 b 1 HC 


Uc J joo 


#AO— 3A^1 




TCTZ.7 
1 b 1 H J 


nD^/»A3 
Uc300c 


#7n-3A7R 




TCT/.Z. 


nD/»3in 

UcOc 1 U 


#71 -3«»7A 
If f \ CJi o 




TCTZ. <; 
1 b 1 *» J 


UcOj*»*» 


#73— 3A1 A 
m I c CO 1 0 




1 O 1 HO 


UCOOUc 


73-3AA7 

f c COf J 


m f f- cOf 


TCTA7 


nP737A 
Uc fcfo 


7'>-37A^ 


7^-37^A 
fj~Cf hO 


1 b 1 J 


Uc 1 c 1 


#7Q_3nn3 




TCT^n 

1 3 1 J\J 


ATAI 7/!, 


7A-3ftA7 
f o coOf 




1 b 1 3 1 


fl7in3n 

U3 1 UcU 


77«7AA/ 
f f 3Uv*» 


#7R-7n«;3 


1 b 1 JC 


n71 ATA 
U3 1 03*» 


7fl— 71 AA 




TST5^ 

1 O 1 J -J 




iffl1-71 7A 




TST5A 


032236 


#82-3183 




TSr55 


032A44 


#83-^197 




TST6 


021366 


39-2022 


#40-2039 


TST7 


02K0« 


#41-2050 




TYP8N 


= 10A406 


88-3271 


#98-3347 


TYPOS 


= 104405 


84-3215 


84-3215 



35 PAGE 10 
SEQUENCE 146 

CREF V01 



D 12 



30-1759 *31-1780 31-1788 •72-2650 72-2656 •78-3147 78-3161 
•33-1838 



75-2752 #76-2768 



88-3265 90-3326 #98-3347 







CREATED BY 


MACRO ON 23-APR-81 AT 


13:35 
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SEQUENCE 147 




SYMBOL 


CROSS REFERENCE 








t W\F f uAi 

CREF vol 




SYMBOL 


VALUE 


REFERENCES 




84-3<: l!> 


O/ Tli c 


oO-3cl7 


TYPE 


- 


104401 


33-1839 


84-3215 




88-3248 


A A 7 "^C A 

88-3250 


OO 71QA 

8o-3co0 


OO TIQ/ 

oo-3^y*« 


00-33UU 








89-3315 


OA 77 i C 

89-3315 


07-331 3 


fla_TT1 c 

oV— 331 3 


BO— TT1 C 
OV- 33 1 3 








An 774 r 

89-331 5 


89-3315 


oV-331 3 


oV-331 3 


00_TT1 C 
07-3 J 1 3 








rty 777ft 

94-3339 


AC 7 7/ i 

95-3341 


mQO 77/ 7 

#Vo-33»i7 


QQ 7 7/ O 




TYPOC 


- 


104402 


88-3229 


OO 7'iCA 

88-3259 


0O_771 C 

oV— 331 3 


CA_TTOT 


*70 33*t f 


TYPON 


— 


104^04 


#98-3347 










TYPOS 




104403 


#98-3347 










udpaho 




1 77660 


#1 5-1200 










UQPAHl 


— 


1 77662 












UDPAH<? 




1 77664 


#15-1200 










1 A n 7 

UDPARi 




1 77666 


#15-1200 










UDrAn*» 




1 7 r6f 0 


Mi C i '^AA 

#15-1200 










U0PAR5 




177672 


#15-1200 










UDPAR6 




1 ffOf't 


#1 5-1200 










LDPAHr 




1 77676 


#15-1200 


53-23^3 


C7_77/. Z 

33-£3«i3 






UUPURO 




1 77620 


Mi C i lAA 

#15-1200 










UDPDRl 


— 


1 77622 


Mi C i "lAA 

#15-1<:00 














1 77o2** 


#15-1200 










UDPDR3 




1 /'6<:6 


Mi C i 1AA 










UDPDRh 




1 /'6 jU 


Mi IT i 'lAA 

#15-1200 










UDP0R5 




1 rrb52 


Mi C i '^AA 

#15-1200 










UDPDRo 




1 77X 1/ 

1 r 7634 


Mi C i OAA 

#1 5-1 ^00 










UDPVHf 




1 ffo5t 


Mi C i "^AA 

#1 3-1^00 


17CO 

56-2358 


30-£330 




33— e3*»3 


1 1 f n AAA 






Mi C i "^AA 

#15-1200 


7^) i O i i 

32-1811 


/ / _OA0C 


33- c3*»3 








*65-2422 


65-2h22 


03-tfHCC 


03-tfHitf 


TA-O^QT 


1 1 T n A A 1 

UIPAR1 




1 77^/ "5 

1 77642 


MIC i "^AA 

#1 3-1 200 










1 1 1 n A 

UIPAR2 




177644 


Mi C i 1AA 

#15-lcOO 










1 1 ff n A n V 

UIPAR3 






Mi C i OAA 

#15-1200 


OO 71 OC 

82-3185 








1 1 ff n Any 




1 77A5rt 


Mi C i ^AA 

#15-1200 


^70 7A7A 

♦78-3079 


•78-3109 


•78-3127 


■ f 0—3 1 30 


1 1 1 O AOC 

UIPAH5 




1 77/lCO 


#15-1200 


•78-3080 


•ro— 31 lU 


*7a_T1 3A 




1 1 f Q AA^ 




1 77itC/ 


Mi C i ^AA 

#15-lcw 










UIPAR7 




1 77Z.CX 

1 7/'6d6 


#1 3-1 cOU 










UIPORO 




1 77XArt 

1 r6UU 


Mi C i ^AA 

#1!>-1«:0U 


HO-cOyti 


36-c3>o 


3O-c330 


56-2358 






•68-2437 

01 7i OC 

82-3185 


Z. O 1/ T7 

68-2437 

OO Ti OC 

82-3185 




iLa_0/.T7 

6o-ch37 


7A_O^QO 


1 1 1 OftD 1 

UIPuRl 
















1 1 ff nnn 1 

UIPuR<: 




177604 


Mi C i ^AA 










UIP0R3 




177606 


Mi C i "lAA 

#15-1200 








• 7R— 71 XL 


1 1 f Ot\D/ 

UIPuRh 




177610 


Mi C i "lAA 

#1 5-1200 


i«.70 TA7C 

•78-3075 


a7D Ti i i 

•78-31 1 1 


•70-31 c3 


UIPDR^ 




177612 


Mi C i 1AA 

#15-1200 


iA.70 VA7X 

•78-3076 


•70-31 Ic 


•70-31 CO 


*7fl-'X1 X^ 
■f O 3 133 


UJPuRo 




177614 


Mi C i ^AA 

#15-1200 










ulrORf 




177616 


Mi C i ^AA 

#15-1200 










1 IC C C T ^ 




000600 


Mi c i ^i y 

#15-1«14 


TO i OXA 

38-1960 








1 ICD 

U5P 


-X000006 


#1 5-1 20t 


•38-1960 


*Ta_1 07A 

•3o— iy7o 


/.B— OOAA 

^o— ceOO 


■••O ccO/ 


VJRT 1 




001276 


Mi i. 1 07ii 

#16-1*: 76 


3*:- 1816 


TO 

32-1 822 


a70 TAOy 

•7o-30th 


7B— Tino 
f 0—3 1 Uc 


vJRTc 




001300 


Mi ^ i 

#16-1276 


•78-3093 


1 Uc 3*130 






1 1 A C n^ 




001256 


w 10- 1 CIO 


■jU— 1 f j 1 


•31-1781 


•72-2648 


inO-TAi7 


WA55RO 




001264 




•31-1782 


•72-2646 


•78-3153 


1 n'^—XLLR 


yASSAI 




001266 




•31-1783 


102-3448 










001270 


#16-1276 


•31-1784 


•46-2125 


46-2127 


"■to C 1 "to 






102-3459 


102-3460 


102-3463 







86-3219 

88- 3305 

89- 3315 

90- 3320 



88- 3221 

89- 3315 

89- 3315 

90- 3324 



88- 3243 

89- 3315 
89-3315 
91-3333 



88- 3245 

89- 3315 
89-3315 
93-3337 



53-2343 
70-2553 



53-2343 
78-3058 



53-2343 65-2422 



56-2358 
70-2542 



56-2358 
74-2682 



62-2400 
78-3068 



68-2437 
82-3185 



•48-2268 
•78-3151 

102-3448 
102-3460 



•48-2275 
102-3458 102-3460 



46-2147 •72-2647 •78-3154 



102-5448 



F 12 



CKKTAS 


CREATED BY 


MACRO ON 23-APR-81 AT 


13;35 


PAGE 12 














SEQUENCE 148 








SVMBCX. 


CROSS REFERENCE 








CREF vol 










VALUE 


REFERENCES 








Q1 _71 7B 

81 "31 to 


B1 _71 7B 


B1 —71 7B 

Ol-31 fo 


UBI T 


= 000100 


#15-1211 


80-31 72 


80-3172 


80-3172 


82-3185 














lAPTHO 


000204 


15-1275 


#15-1275 












lASTAT 


:r ****** 


92-3335 


92-3335 












tATVC 


035760 


92-3335 


#92-3335 












tATYl 


03575A 


#92-3335 














• A T w T 


035 742 


91-3333 


#92-3335 












lAT V4 


035752 


86-3219 


#92-3335 




89-331 5 


oV-3315 






SAUTQB 


001154 


#16-1276 


•33-1839 


89-331 5 






SSOADfi 


001122 


#16-1276 














S800AT 


001126 


#16-1276 






87-3219 








SSELL 


001214 


#16-1276 


86-3219 


87-3? 19 








SBIN 


036254 


•93-3337 


•93-3337 


93-3337 


#93-3337 








SCHARC 


035730 


♦91-3333 


•91-3333 


91-3333 


A4 9999 

•91-3333 






SCKSWR 


034264 


#89-331 5 


98-3347 


98-3347 










ICLR.T 


032732 


84-321 5 


#84-3215 










33-1838 


SCMTAG 


001 100 


#16-1276 


33-1838 


33-1838 


33-1838 


33-1 o3o 


77—1 B7B 

33-1 o3o 


SCW1 


= 000006 


#16-1276 


16-1276 


16-1276 


#16-1276 




lo- ic^o 


Ml 07^ 

#lo- l<:'^o 


#16-1276 


16-1276 


16-1276 


#16-1276 


16-1276 


16-1276 


#16-1276 






#16-1276 












Ml A_1 57A 
• lo— Ic' O 


$CM2 


= 000014 


#16-1276 


16-1276 


16-1276 


#16-1276 


1 O- 1 C ' O 


10-lc70 


#16-1276 
#16-1276 


16-1276 


16-1276 


#16-1276 


IO-lc70 


1 iC._1 07A 


#10-1^70 


SCM3 


= 000006 


#16-1276 


16-1276 


16-1276 










$CM4 


= 000006 


#16-1276 


16-1276 


4 ^ 4 ^"V^ 

16-1276 


#1 6-1 276 


lo- l<:7o 


07A 
10-lc70 


•10- IcfO 




#16-1276 
#16-1276 


16-1276 


16-1276 


m4 ^ 4 '^^^ 

#16-1276 


lo— IC'O 


1 A— 1 57A 
lo— Icf O 


Ml A_1 57A 
» lo— 1 o 


SCNTLC 




#16-1276 


89-331 5 


89-331 5 


89-331 5 


BQ— TTI ^ 

33 1 5 






trNTLG 


035231 


89-331 5 


#89-331 5 












SCNTLU 


035224 


89-331 5 


89-3315 


mBA 'W4 P 

#89-331 5 










SCORE 


002676 


28-1689 


#28-1689 












SCPUOP 


001252 


#16-1276 














ICRLr 


001221 


#16-1276 


84-3215 


86-3219 


a9 9 *\ 4 A 

87-3219 


fl7_7'D1 O 




BS— 77A^ 


89-3315 


89-3315 


OA W 4 P 

89-3315 


A A 99 4 f 

89-331 5 




01_7777 
y 1 —33 J J 


Q1 -7777 

y 1 — J jj3 


tCROUT 


002726 


28-1689 
95-3341 


#28-1689 












S06LK 


036720 


95-3341 


MAP W # 4 

#95-3341 










$0620 


037024 


88-3277 


88-3291 


#97-3345 










JOEvCT 


AA1 OT/ 


#16-1276 














SDOiAGN 


032 7b<: 


84-3215 


84-321 5 


84-3215 


#84-321 5 








tOTBL 


AT^ "71 A 

036710 


95-3341 


#95-3341 












SENDAO 




15-1274 


33-1839 


#84-321 5 


9^4 A 

86-321 9 








ScNDCT 


0325^0 


33-1838 


A«n / 9 *^4 p 

#84-321 5 












ScNULL 


03301 H 


#84-3215 










92-3335 


92-3335 




AA1 y 

001244 


#16-1276 


33-1839 


75-2743 


9^4 A 

86-3219 


y 1-3333 


ItNVM 


AA1 "^J C 

001245 


#16-1276 


W 4 A 9 A 

33-1838 


A4 9999 

91 -3333 


A4 9999 

91 -3333 


y^-3335 






stop 


AT1C/ A 


#84-321 5 


90-3328 












StOPCT 


032562 


*33-1838 


#84-3215 


84-321 5 






o5— 3cl f 


•85-3217 


SERFLG 


AAi t AT 

001103 


#16-1276 


27-1659 


28-1683 


85-3217 








•86-3219 


87-3219 


87-3219 




85-3217 






S£R«AX 


0011 ; 5 


#16-1276 


•33-1838 


•85-3217 


85-3217 






SERROR 


033246 


33-1838 


#86-3219 










88-3227 


SERRPC 


001116 


#16-1276 


•86-3219 


•86-3219 


86-3219 


87-3219 


87-3219 



16-1276 
16-1276 

16-1276 
16-1276 



16-1276 
16-1276 



16-1276 
16-1276 

16-1276 
16-1276 



16-1276 
16-1276 



88-3250 88-3305 



85-3217 85-5217 



88-3513 102-4447 



CKKTAB 


ATPf\ Bk# 

CRFATED BY 


MACRO ON 23-APR-81 AT 


13:35 
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SEQUENCE 149 












SYMBOL 


CROSS REFERENCE 








CREF vol 








\ 




SYMBOL 


VALUE 


REFERENCES 








lU<:-343<r 


1 U£-3h33 


1 A0_7A 5y 




1 AO— 7/. ex 


102-3448 


102-3449 


102-3450 


4 A^ 7 / r 4 

102-3451 


1 A0_7/.CC 






102-3457 


102-3458 


102-3459 


4 A '\ 7 / y A 

102-3460 


1U2-3401 


102-3462 


1 A0_7y A7 

1 02-3463 


1 AO_Ty X7 

'02-346' 


1 A0_7/. 7A 

1 Uc- 54 f U 






102-3471 


102-3472 


102-3473 


4 A^ 7 / 7/ 

102-3474 


102-340 


1 AO 7y 7X 

102-34/^6 


1 AO_7y 77 

102-54r A 


n AO_zy 7B 
102- 34 AO 




SERRTB 


001 372 


#17-1276 


88-3240 








07-7010 








KRTTL 


001112 


#16-1276 


84-3215 


•84-3215 


•86-3219 










•cSCAP 


001212 


#16-1276 


•33-1838 


•85-321 7 


86-3219 


oo- JC 1 ▼ 




Of -3c 1 7 






S£TA8L 


001 2A4 


#16-1276 


















$€TEND 


001 25A 


15-1275 


#16-1276 
















SFATAL 


001226 


#16-1276 


•92-3335 




^ 7 77 C 

•92-3335 


WTi— JJjD 










SFFLG 


036200 


•92-3335 


•92-3335 


92-3335 










%f ILLC 


001 1 56 


#16-1276 


91-3333 


^1 7 77 7 

91-3333 


n4 7777 

91-3333 












SF ILLS 


AA1 ICC 

001155 


#16-1276 


91-3333 


7777 

91 -3333 














SGOAOR 


001120 


#16-1276 


















•GODAT 


001 124 


#16-1276 




















032714 


#84-321 5 




98-3347 














•GTSWR 




#89-331 5 


98-3347 














SHO 


= 000000 


15-1197 


15-1197 


15-1197 














IHIBTS 


AAA 1 Ay 

000204 


#15-1275 
















t 


ilCNT 


001104 


#16-1276 


















tILLUP 


037410 


99-3349 


99-3349 


#99-3349 














>INTAG 


AA1 1 TC 


#16-1276 


89-3315 


89-3315 


89-331 5 


Oy J J 1 J 










IITEMB 


AA1 11/ 

001 114 


#16-1276 


•86-3219 


A^ 7^4 A 

86-321 9 


7 14 A 

86-3219 


•oo-jciy 


fix.— 701 Q 


B7— 701 Q 

Of JCfy 


fi7— 7010 
Of — 3c l7 


BB— 700/. 
OO— DtCH 


SKTNEX 


002670 


28-1689 


#28-1689 
















SKTOUT 


002660 


28-1689 


#28-1689 
















*w Til 


002512 


#28-1 689 


•28-1689 


•28-1689 


•33-1853 












»LF 


001222 


#16-1276 


87-3219 


87-3219 


A/\ 774 ^ 

89-331 5 


OT— ID 


07— 33 1 J 


Q1_7777 
V 1 —3333 


Q1_7777 
7 1 —3333 




$LFLG 


rt7^ 1 77 

036177 


•92-3335 


#92-3335 
















SLOOP 


033010 


84-3215 


#84-3215 














BC_701 7 

85-3CI f 


SLPADR 


1 A^ 

001 106 


#16-1276 


•33-1838 


76-2889 


77-3026 


•85-321 f 


aOC 701 7 

•85-321 r 


BC 7017 

85-321 r 


BC_701 7 

85-321 ' 


SLPERR 


001 110 


#16-1276 


•29-1696 


•29-1 706 


•33-1838 


•35-1 o6r 


•35-1 oo2 


*7X. 1 OBO 

•36-1 BBV 


»7X._1 OA/ 

•36-1 V04 


*77_1 Q1 y 

•3y— ItIh 






•37-1928 


•37-1941 


•38-1970 


^ 7n ^AAy 

•39-2004 


•3V-201 f 


^y X. oi oy 
•46-21 24 


«yx 0177 
•46-2133 


«y x_oi C7 
•46-21 5f 


*y B_oi oy 






•48-2202 


•48-2207 


•48-221 7 


•48-2227 


•4o-22jo 


^y B OOC1 
•40-2251 


^y o ooxy 
•48-2264 


*y B 007B 


*y Q_oooy 

*H7— CC7*» 






•49-2303 


•49-2309 


•49-2314 


^ ^ 4 ^7 7 7 

•51-2333 


•51-2333 


0777 

•51-2333 


*CO 077B 

•52-2338 


«C0_077B 

•52-2338 


«C0_077B 

•52-2338 






•53-2343 


•53-2343 


•53-2343 


•54-2348 


•54-2348 


•54-£34o 


*CC_07C7 

•55-^333 


*CC_07C7 

•53-C333 


*CC_07C7 

•35-^353 






•56-2358 


•56-2358 


c y ^^7 c A 

•56-2358 


•57-2375 


^C* OT7C 


^CO 070A 

•58-2380 


aCO 07BA 

•58-2380 


«CQ_07BC 

•57-2385 


«CQ_07BC 

•57-2385 






•60-2390 


•60-2390 


•61 -2395 


^ y 4 '^7Af 

•61-2395 


•62-2400 


aX.O_OZ AA 

•62-24UU 


»x7_oy 1 o 
•63-^41 £ 


*X7_0/. 1 0 

•63-^*»l^ 


*X7_0/.1 O 

•63-^«»l£ 






•64-2417 


•64-2417 


^ y / ^/ 7 

•64-2417 


•65-2422 


•05-2422 


AXC_oy oo 
•65-2422 


AXX._oy 07 
•66-^42f 


*xx._oy 07 


*XX._0Z07 






•67-2432 


•67-2432 


- y 7 J 7^ 

•67-2432 


^ y A ^ / 77 

♦68-2437 


oy IT 
•68-243 r 


^XB—Oy 77 

•68-243/^ 


^xo_oy CO 
•67-^45^ 


*xa_o/ XA 
•67-2460 


*67-£«»68 






•71-2587 


•71-2601 


•72-2618 


•72-2641 




a7X._07B1 


*7X_07O7 

• f 6-£ y 73 


*7X._0B0fl 

•f 6-c8£0 


*7X_0B/.C 

•y6— cOh J 






•76-2853 


•76-2866 


•77-2921 


^ 77 '%y\7 7 

•77-2933 


•f f~cyoti 


*77_OOfl1 


*77_0OBO 
•/^ y — C707 


*77_7nA0 

• f y — 3U0t 


• 7fi_7rtBZ. 

• y 0-3UOH 






•78-3143 


•80-31 72 


^ A A 7 4 7'^ 

•80-31 72 


•81-3178 


•o1-3ko 


«BO_71 fiC 

•82-31 o5 


*BO_71 BC 

•82-3105 


■03-3c00 


*B7_701 7 

•03-3cl 3 






85-321 7 


•85-321 7 


AP 7^4 7 

85-3217 


AP 7^4 7 

85-321 7 


86-3217 










SLSTAD 


AA7AOA 

003020 


•28-1689 


#28-1689 
















SLSTBK 




•28-1689 


#28-1689 


74-271 5 


76-2773 




y6— co3h 


7A_0BCA 
f 0— cOjO 


'6 cOf H 


77— 0O1/. 
y y — £7 1 *• 




77-2924 


77-2949 


77 ^AAA 

77-2990 


77 ^AA/ 

77-2994 


77-.Trt1 1 

f r-3Ul 1 


ino_7z.7z. 
lUc 3h ft 




01.77'^'^ 

7 1 — JJJJ 




VWIL 




15-1275 


15-1275 


#16-1276 


77 4 A7A 

33-1838 


33-1037 


ac_70i 7 


00-3C 1 7 




Af\n 

VvAOR 


A/\A1AX 

000206 


#15-1275 


















inFLG 


AT^ 1 7A. 
0361 ft 


•92-3335 


92-3335 


•92-3335 


#92-3335 












VMEW 


ATC 1/ 7 

035247 


89-3315 


#89-3315 




















#16-1276 


•92-3335 


92-3335 














SnSGLG 


001242 


#16-1276 


•92-3335 
















SMSGTY 


001224 


#16-1276 


92-3335 


•92-3335 


92-3335 


•92-3335 











CKKTAB 

SY«OL 

SYMBOL 

V1SWR 

WXCNT 

SNULL 

tNUTST 



CRFAIED BY MACRO ON 23-APR-81 AT 



CROSS REFERENCE 
VALUE 

035256 

001 3A4 

001154 
= 000001 



SOCNT 
$OCTVL 

sonooE 

COVER 
SPASS 

SPAsm 

SPWRAD 

SPURON 

SPWRMG 

$PVJRUP 

SQUES 

WOCHR 

SRDDEC 

SROLIN 

SRDOCT 

SROSZ 

SREGAO 

SREGO 

JREG1 

SREG2 

SREG3 

SREG4 

SREG5 

tRESRE 

SRTNAO 

SRTRN 



036500 
037126 
036502 
033230 
001232 
000212 
037372 
037232 
037366 
037304 
001220 
034606 

034736 
= •••••• 

= 000010 
001160 
001162 

001164 

001166 

001170 
001172 
001174 
036766 
033012 
033006 



REFERENCES 

89-331 5 
*1 6-1 276 
#16-1276 
#34-1866 

36-1913 
#39-2002 

41-2050 
#43-2083 

45-2114 
#48-2191 

51-2332 
#53-2347 

55-2357 
#58-2379 

60-2389 
#62-2411 

64-2421 
#67-2431 

69-2451 
#71-2616 

75-2768 
#78-3052 

81-31 76 
•94-3339 

97- 3345 
•94-3339 

85-3217 
#16-1276 
#15-1275 
#99-3349 

33-1838 
#99-3349 

99-3349 
#16-1276 
#89-3315 

98- 3347 
#89-3315 

98-3347 
#89-3315 
#16-1276 
#16-1276 

102-3467 
#16-1276 

102-3457 
#16-1276 

102-3467 
#16-1276 
#16-1276 
#16-1276 
#96-3343 
#84-3215 

33-1838 



13:35 PAGE 14 
SEQUENCE 150 

CREF V01 



H 12 



#89-3315 

91-3333 

34-1866 
#37-1913 

39-2002 
#41-2061 

43-2083 
#46-2114 

48-2191 
#51-2337 

53-2347 
#56-2357 

58-2379 
#60-2394 

62-2411 
#65-2421 

67-2431 
#69-2478 

71-2616 
#76-2768 

78-3052 
#81-3183 
•94-3339 
#97-3345 
•94-3339 

85-3217 
•33-1838 



91-3333 
#35-1866 

37-1913 
#39-2039 

41-2061 
#44-2083 

46-2114 
#48-2286 

51-2337 
#54-2347 

56-2357 
#58-2384 

60-2394 
#63-241 1 

65-2421 
#67-2436 

69-2478 
#72-2616 

76-2768 
#79-3171 

81-3183 
#94-3339 

94-3339 
85-3217 
•84-3215 



91-3333 

35-1866 
#37-1953 

39-2039 
#42-2061 

44-2083 
#46-2167 

48-2286 
#52-2337 

54-2347 
#56-2374 

58-2384 
#61-2394 

63-2411 
#65-2426 

67-2436 
#70-2478 

72-2616 
#76-2908 

79-31 71 
#82-3183 



•94-3339 
#85-3217 
•84-3215 



#35-1888 

37-1953 
#40-2039 

42-2061 
#44-2094 

46-2167 
#49-2286 

52-2337 
#54-2352 

56-2374 
#59-2384 

61-2394 
#63-2416 

65-2426 
#68-2436 

70-2478 
#73-2674 

76-2908 
#80-31 71 

82-3183 



•94-3339 
84-321 5 



35-1888 
#38-1953 

40-2039 
#42-2072 

44-2094 
#47-2167 

49-2286 
#52-2342 

54-2352 
#57-2374 

59-2384 
#61-2399 

63-2416 
#66-2426 

68-2436 
#70-2576 

73-2674 
#77-2908 

80-3171 
#82-3197 



#94-3339 
84-3215 



#36-1888 

38-1953 
#40-2050 

42-2072 
#45-2094 

47-2167 
#50-2332 

52-2342 
#55-2352 

57-2374 
#59-2389 

61-2399 
#64-2416 

66-2426 
#68-2451 

70-2576 
#74-2674 

77-2908 
#80-3176 

82-3197 



36-1888 
#38-2002 

40-2050 
#43-2072 

45-2094 
#47-2191 

50-2332 
#53-2342 

55-2352 
#57-2379 

59-2389 
#62-2399 

64-2416 
#66-2431 

68-2451 
#71-2576 

74-2674 
#77-3052 

80-3176 
#83-3197 



#36-19^3 

38-2002 
#41-2050 

43-2072 
#45-2114 

47-2191 
#51-2332 

53-2342 
#55-2357 

57-2379 
#60-2389 

62-2399 
#64-2421 

66-2431 
#69-2451 

71-2576 
#75-2768 

77-3052 
#81-3176 

83-3197 



84-3215 90-3318 



#99-3349 


99-3349 














#99-3349 
87-3219 
98-3347 


87-3219 
98-3347 


89-3315 


89-3315 


89-3315 


89-3315 


91-3333 


91-3333 


98-3347 


98-3347 














89-3315 
















•86-3219 

102-3468 
•86-3219 

102-3459 
•86-3219 

102-3469 
•86-3219 
•86-3219 
•86-3219 

98-3347 


102-3449 
102-3469 
102-3449 
102-3462 
102-3453 
102-3471 
102-3454 
102-3458 
102-3458 


102-3450 
102-3471 
102-3452 
102-3467 
102-3453 

102-3471 
102-3460 
102-3475 


102-3452 
102-3476 
102-3452 
102-3468 
102-3455 

102-3475 
102-3463 
102-3476 


102-3453 

102-3453 
102-3469 
102-3456 

102-3476 
102-3469 
102-3477 


102-3456 

102-3454 
102-3473 
102-3457 


102-3457 
102-3455 
102-3462 


102-3464 
102-3456 
102-3464 


•33-1838 


•33-1838 


84-3215 


#84-3215 
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PAGE 15 


I 12 










SEQUENCE 151 




SYMBOL 


CROSS REFERENCE 








CREF vol 




SYMBOL 


VALUE 


REFERENCES 












— 


•••••• 


98-3347 




98-3347 






SSAVRE 




036730 


#96-3343 


98-3347 


•99-3349 


#99-3349 


tSAVR6 




037AU 


•99-3349 


99-3349 


•99-3349 


SSCOPE 




033020 


33-1838 


#85-3217 


#15-1272 


15-1272 


#15-1272 


tSE TUP 


r 


000137 


#15-1272 


15-1272 




15-1272 


#15-1272 


15-1272 


#15-1272 


33-1838 








33-1838 


33-1838 


33-1838 


33-1838 


33-1838 








33-1839 


84-3215 


84-3215 


85-3217 


86-3219 








89-3315 


99-3349 








SSIZE 




002454 


#28-1689 


33-1854 








»SIZEX 




002732 


28-1689 


#28-1689 




#15-1272 


#15-1272 


$STLtf> 


= 


Mim 


#15-1272 


#15-1272 
#15-1272 


15-1272 






#15-1272 


15-1272 


#15-1272 


#15-1272 


SSVLAD 




033174 


85-3217 


85-3217 


#85-3217 






SSVPf 




000204 


#15-1274 


15-1274 








SSWR 


s 


173400 


#15-1193 


15-1197 


15-1198 


15-1198 


15-1198 






15-1198 


16-1276 


16-1276 


16-1276 


33-1 838 








35-1866 


36-1888 


37-1913 


38-1953 


39-2002 








44-2083 


45-2094 


46-2114 


47-2167 


48-2191 








54-2347 


55-2352 


56-2357 


57-2374 


58-2379 








63-2411 


64-2416 


65-2421 


66-2426 


67-2431 








72-2616 


74-2674 


76-2768 


77-2908 


78-3052 








84-3215 


84-3215 


84-3215 


84-3215 


84-3215 








85-3217 


85-3217 


85-3217 


85-3217 


85-3217 








85-3217 


85-321 7 


85-3217 


85-3217 


85-3217 








86-3219 


86-3219 


86-3219 


86-3219 


Y^4 n 

86-3219 








99-3349 










SSWREG 




001246 


#16-1276 


33-1838 








SSURMK 


- 


000000 


15-1198 


15-1198 


15-1198 


15-1198 


15-1198 






85-3217 
85-321 7 


85-3217 


85-3217 


85-3217 


85-3217 


STBIT 




001 346 


#16-1276 


•33-1838 


•84-3215 


84-321 5 


84-3215 


STESTN 




001230 


#16-1276 


•85-3217 


88-3313 






$TKB 




001146 


#16-1276 
91-3333 


89-3315 
91-3333 


89-3315 


89-3315 


89-3315 


$TKS 




001144 


#16-1276 
91-3333 


89-3315 
91-3333 


89-3315 
91-3333 


89-331 5 
91-3333 


A/\ W4 F 

89-331 5 


$TMPO 




001176 


#16-1276 


•48-2253 


48-2262 


•48-2266 


48-2275 








*53-2343 


•53-2343 


•54-2348 


•54-2348 


•55-2353 








74-2710 


•76-2787 


76-2805 


^77-2^27 


77-2945 








102-3460 










STMPI 




001200 


#16-1276 


•76-2884 


•77-3021 


102-3470 


102-3472 


$TMP2 




001202 


#16-1276 


•76-2792 


•77-2932 


102-3470 




$TMP3 




001204 


#16-1276 










STMPA 




001206 


#16-1276 


29-1691 


29-1693 


•29-1711 


^ '^/^ 4 *9 4 y 

•29-1714 


$T«P5 




001210 


#16-1276 


•51-2333 


•52-2338 


•53-2343 


•54-2348 








* 59-2385 


•60-2390 


•61-2395 


•62-2400 


AA V^A/S 

•88-3289 


$TN 




000056 


#15-1194 


15-1197 


34-1866 


35-1866 


#35-1 866 








37-1913 


#37-1913 


37-1953 


38-1953 
40-2050 


#38-1953 








39-2039 


40-2039 


#40-2039 


4 1-^050 








42-2072 


43-2072 


#43-2072 


43-2083 


44-2083 








45-2114 


46-2114 


#46-2114 


46-2167 


47-2167 



4 f 4 "^^"^ 

15-1272 


m4 P 4 

#15-1272 


15-1272 


aa4 P 4 ^ 

#15-1272 


33-1838 


33-1838 


33-1838 


33-1838 


33-1838 


7*7 4 A7 A 

33-1838 


7 7 1 OTA 

33-1839 


W 4 OTA 

33-1839 


86-3219 


86-3219 


86-3219 


89-3315 


15-1?72 


Mi C 1 

#15- li^^ 


#1 5-1272 


i C i 

15-1272 


1 C 1 

15-1?7? 




Mi C i 

#15-1272 


i C i 

15-1272 


i c i i no 
15-1198 


i C i i OO 
13- 1 198 


i C 1 i OO 

15-1 198 


i C 1 i OO 

1 5-1 198 


33-1838 


33-1838 


33-1838 


33-1838 


40-2039 


/ i ■^ACA 

41-<?050 


42-2061 




49-2286 


51-2332 


52-2337 


53-2342 


59-2384 


60-2389 


61-2394 


62-2399 


68-2436 


69-2451 


70-2478 


71-2576 


80-3171 


81-3176 


82-3183 


83-3197 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


85-3217 


86-3219 


86-3219 


86-3219 


86-3219 


87-3219 


87-3219 


15-1198 


15-1198 


15-1198 


15-1198 


85-3217 


8':-32l7 


85-3217 


85-3217 


•99-3349 








oo Til C 




Q1 7777 


Q1 _7777 

91-3333 


oo TTi C 


OO 77i C 


oa_77i c 


QQ_771 C 

89-331 5 


•D 


*C1 0777 


•52-2338 


•52-2338 


•DD-CJDJ 




•50-2358 


•7/ _07O1 


OO^O 

•77-^968 


77-Cf7\ 


•78-3086 


1 no 7/ cfl 
102-3458 


•88-3288 


88-3290 






•55-2353 


•56-2358 


•57-2375 


•58-2380 


•90-3318 


•90-3319 


90-3325 




35-1888 


36-1888 


#36-1888 


36-1913 


38-2002 


39-2002 


#39-2002 


39-2022 


#41-2050 


41-2061 


42-2061 


#42-2061 


#44-2083 


44-2094 


45-2094 


#45-2094 


#47-2167 


47-2191 


48-2191 


#48-2191 



J 12 
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SEQUENCE 152 



SYMBOL 


CROSS REFERENCE 








CREF V01 












SYMBa 


VALUE 


REFERENCES 






50-2332 


51-2332 




51-2333 


51-2337 


52-2337 






48-2286 


49-2286 


#49-2286 


#51-2332 








#52-2337 


52-2338 


52-2342 


53-2342 


#53-2342 


53-2343 


53-2347 


54-2347 


#54-2347 








54-2348 


54-2352' 


55-2352 


#55-2352 


55-2353 


55-2357 


56-2357 


#56-2357 


56-2358 








56-2374 


57-2374 


#57-2374 


57-2375 


57-2379 


58-2379 


#58-2379 


58-2380 


58-2384 








59-2384 


#59-2384 


59-2385 


59-2389 


60-2389 


#60-2389 


60-2390 


60-2394 


61-2394 








#61-2394 


61-2395 


61-2399 


62-2399 


#62-2399 


62-2400 


62-2411 


63-2411 


#63-2411 








63-2416 


64-2416 


#64-2416 


64-2421 


65-2421 


#65-2421 


65-2426 


66-2426 


#66-2426 








66-2431 


67-2431 


#67-2431 


67-2436 


68-2436 


#68-2436 


68-245 i 


69-2451 


#69-2451 








69-2478 


70-2478 


#70-2478 


70-2576 


71-2576 


#71-2576 


71-2616 


72-2616 


#72-2616 








72-2643 


73-2674 


74-2674 


#74-2674 


75-^744 


75-2746 


75-2752 


75-2768 


76-2768 








#76-2768 


76-2867 


76-2908 


77-2908 


#77-2908 


77-3004 


77-3052 


78-3052 


#78-3052 








78-3144 


79-3171 


80-3171 


#80-3171 


80-31 76 


81-3176 


#81-3176 


81-3183 


82-3183 








#82-3183 


82-3197 


83-3197 


#83-3197 












$Tpe 




001152 


#16-1276 


91-3333 


91-3333 


91-3333 












tfPFLG 




001157 


#16-1276 


91-3333 


91-3333 


91-3333 












$TPS 




001 1 50 


#16-1276 


91-3333 


91-3333 


91-3333 












STRAP 




037U4 


33-1838 


#98-3347 
















$TRAP2 




037166 


#98-3347 


98-3347 
















STRP 




000015 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 






98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 








98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 








98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 








98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 








#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 








98-3347 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


#98-3347 






STRPAD 




037200 


98-3347 


#98-3347 
















STSTM 




000210 


#15-1275 


















JTST»#1 




001102 


#16-1276 


•84-3215 


85-321 7 


85-3217 


•85-3217 


^85-3217 


85-3217 


85-3217 


85-3217 








86-3219 


86-3219 


87-3219 


87-3219 


90-3321 










STTYIN 




0352U 


89-3315 


89-3315 


89-3315 


89-331 5 


89-3315 


#89-3315 








STYPBN 




036202 


#93-3337 


98-3347 


98-3347 














STYPOS 




03650A 


#95-3341 


98-3347 


98-3347 














STYPE 




035370 


#91-3333 


92-3335 


98-3347 


98-3347 












STYPEC 




035602 


89-331 5 


91-3333 


91-3333 


91-3333 


#91-3333 










STYPEX 




035732 


91-3333 


91-3333 


91-3333 


#91-3333 












STYPQC 




036302 


#94-3339 


98-3347 


98-3347 














STYPON 




036316 


94-3339 


#94-3339 


98-3347 














STYPOS 




036256 


#94-3339 


98-3347 
















SUNIT 




001236 


#16-1276 


















SUNIJM 




0002K 


#15-1275 


















SUSUR 




001250 


#16-1276 


75-2745 
















SXOfF 




000023 


91-3333 


91-3333 
















SXON 




000021 


89-3315 


91-3333 


91-3333 


91-3333 












SXTSTR 




033032 


#85-321 7 


















$$GET4 




000001 


#84-3215 


#84-3215 


84-3215 














$0FILL 




036501 


*94-3339 


•94-3339 


94-3339 


#94-3339 












SAOCAT 






85-3217 


86-3219 
















.SASTA 






92-3335 


92-3335 
















.sx 




00020^ 


#15-1275 


•T5-1275 
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SEQUENCE 153 


MACRO CROSS 


REFERENCE 






CREF VOl 


MACRO MA«E 


REFERENCES 






#65-2422 #66-2427 


BYT ADR 


#15-1162 


#63-2412 


#64-2417 


BYTEMG 


#62-2401 


#63-2411 


#64-2416 


#65-2421 #66-2426 


COWMEN 


#15-1199 








C0UNT1 


#15-1074 


57-2375 


58-2380 


59-2385 60-2390 


DUAL 


#15-1033 


51-2333 


52-2338 


53-2343 54-2348 


OUALMG 


#50-2319 


#51-2332 


#52-2337 


#53-2342 #54-2347 


ENDCOn 


#15-1199 








ESCAPE 


#15-1199 








GETPRI 


#15-1199 


84-3215 






GETSUR 


#15-1199 


#33-1839 


33-1839 




RSG1 


#34-1860 


35-1866 






nsGio 


#43-2080 


#44-2083 






MSG11 


#44-2091 


45-2094 






nSG12 


#45-2102 


46-2114 






MSG13 


#46-21 58 


47-2167 






MSGU 


#47-2179 


48-2191 






nSGUA 


#48-2279 


#49-2286 






MSG15 


#50-2329 


#51-2332 






nSGI SA 


#51-2334 


#52-2337 






MSGISe 


#52-2339 


#53-2342 






MSG15C 


#53-2344 


54-2347 






nSGISD 


#54-2349 


#55-2352 






MSG15E 


#55-2354 


56-2357 






nSG16 


#56-2371 


#57-2374 






nSG16A 


#57-2376 


#58-2379 






nsGi6e 


#58-2381 


#59-2384 






nSG16C 


#59-2386. 


#60-2389 






MSG160 


#60-2391 


#61-2394 






MSG16E 


#61-2396 


#62-2399 






MSG17 


#62-2408 


#63-2411 






MSG17A 


#63-2413 
#64-2418 


#64-2416 






MSG17B 


65-2421 






MSG17C 


#65-2423 


66-2426 






MSG17D 


#66-2428 


67-2431 






MSG1 7E 


#67-2433 


#68-2436 






MSG2 


#35-1883 


36-1888 






MSG20 


#68-2438 


69-2451 






MSG21A 


#69-2469 


#70-2478 






nSG21B 


#70-2564 


71-2576 






MSG21 C 


#71-2603 


#72-2616 






RSG22 


#73-2663 


74-2674 






nSG23 


#75-2754 


76-2768 






MSG23A 


#76-2895 


77-2908 






nSG24 


#77-3032 


#78-3052 






NSG25 


#79-3168 


80-31 71 






MS625A 


#80-31 73 


81-3176 






nSG26 


#81-3180 


#82-3183 






MSG27 


#82-3187 


83-3197 






MSG3 


#36-1906 


#37-1913 






nsG4 


#37-1942 


38-1953 






MSGS 


#38-1995 


#39-2002 






nSG6 


#39-2036 


40-2039 







61-2395 
55-2353 
#55-2352 



#68- 
#68- 



2437 
2436 



62-2400 
56-2358 
#56-2357 
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^^ACRO CROSS REFERENCE CREF VOI 



MACRO NAME 


REFERENCES 




















MSG? 


#40-2047 


41-2050 


















MSG7A 


#41-2058 


42-2061 


















MSG7B 


#42-2069 


#43-2072 


















MULT 


#15-1199 




















NEWTST 


#15-1188 


#1 5-1199 


#34-1866 


#35-1888 


#36-1913 


#37-1953 


#38-2002 


#39-203V 


#40-2050 


#41-2061 




#42-2072 


#43-2083 


#44-2094 


#45-2114 


#46-2167 


#47-2191 


#48-2286 


#50-2332 


#51-2337 


#52-2542 




#53-2547 


#54-2352 


#55-2357 


#56-2374 


#57-2379 


#58-2384 


#59-2389 


#60-2394 


#61-2399 


#62-2411 




#63-2416 


#64-2421 


#65-2426 


#66-2431 


#67-2436 


#68-2451 


#69-2478 


#70-2576 


#71-2616 


#73-2674 




#75-2768 


#76-2908 


#77-3052 


#79-3171 


#80-3176 


#81-3183 


#82-3197 


PARMSG 


#56-2359 


57-2374 


58-2379 


59-2384 


60-2389 


61-2394 


62-2399 








POP 


#15-1199 


92-3335 


92-3335 


95-3341 


96-3343 


99-3349 


99-3349 








PUSH 


#15-1199 


92-3335 


92-3335 


92-3335 


95-3341 


96-3343 


99-3349 


99-3349 






REPORT 


#15-1199 




















SAVR 


#1 5-936 


#86-3219 


















SETPRI 


#15-1199 




















SETTRA 


#98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 


98-3347 




98-3347 


98-3347 


98-3347 
















SETUP 


#15-1199 


33-1838 


















SKIP 


#15-1199 


39-2022 


51-2333 


52-2338 


53-2343 


54-2348 


55-2353 


56-2358 


57-2375 


58-2380 




59-2385 


60-2390 


61-2395 


62-2400 


72-2643 


75-2744 


75-2746 


75-2752 


76-2867 


77-3004 




78-3144 




















SLASH 


#15-1199 




















SPACE 


#1 5-933 


#15-1199 


















STARS 


#15-1199 


15-1274 


15-1275 


15-1275 


15-1275 


16-1276 


16-1276 


16-1276 


23-1576 


23-1578 




23-1 585 


24-1596 


24-1602 


25-1611 


25-1620 


26-1629 


26-1633 


27-1645 


27-1651 


28-1666 




28-1674 


30-1 730 


30-1 732 


30-1 739 


31-1763 


31-1770 


32-1 792 


32-1806 


33-1834 


33-1836 




34-1857 


34-1859 


35-1866 


35-1866 


36-1888 


36-1888 


37-1913 


37-1913 


38-1953 


38-1953 




38-1982 


38-1994 


39-2002 


39-2002 


40-2039 


40-2039 


41-2050 


41-2050 


42-2061 


42-2061 




43-2072 


43-2072 


44-2083 


44-2083 


45-2094 


45-2094 


46-2114 


46-2114 


47-2167 


47-2167 




48-2191 


48-2191 


49-2286 


49-2286 


50-2316 


50-2318 


51-2332 


51-2332 


52-2337 


52-2337 




53-2342 


53-2342 


54-2347 


54-2347 


55-2352 


55-2352 


56-2357 


56-2357 


57-2374 


57-2374 




58-2379 


58-2379 


59-2384 


59-2384 


60-2389 


60-2389 


61-2394 


61 -2394 


62-2399 


62-2399 


- 


63-2411 


63-241 1 


64-2416 


64-2416 


65-2421 


65-2421 


66-2426 


66-2426 


67-2431 


67-2431 




68-2436 


68-2436 


69-2451 


69-2451 


70-2478 


70-2478 


71-2576 


71-2576 


72-2616 


72-2616 




73-2660 


73-2662 


74-2674 


74-2674 


76-2768 


76-2768 


77-2908 


77-2908 


78-3052 


78-3052 




79-3165 


79-3167 


80-31 71 


80-31 71 


81-3176 


81-3176 


82-3183 


82-3183 


83-3197 


83-3197 




84-3215 


85-3217 


86-3219 


89-3315 


89-331 5 


89-3315 


89-3315 


91-3333 


92-3335 


93-3337 




94-3339 


95-3341 


96-3343 


97-3345 


98-3347 


99-3349 


99-3349 








SWRSU 


#15-1199 


#33-1838 


#33-1838 
















TIMMSG 


#15-1028 


#40-2039 


#41-2050 


#42-2061 


#43-2072 


#44-2083 


#45-2094 








TRHTRP 


#98-3347 




















TYPBIN 


#15-1199 




















TYPOEC 


#15-1199 


84-3215 


84-3215 
















TVPNAM 


#15-1199 


33-1839 


















TVPNIW 


#15-1199 




















TVPOCS 


#15-1199 




















TYPOCT 


#15-1199 


#89-3315 


















TYPTXT 


#15-1199 


84-3215 


84-3215 
















USER 


#15-1225 


#16-1276 


















UKSG 


#15-1101 


#80-3171 


#81-3176 


#82-3183 














WIST 


#15-1116 


80-3172 


81-3178 


82-3185 














SSCMRE 


#15-1276 


#16-1276 


#16-1276 


#16-1276 


#16-1276 


#16-1276 


#16-1276 
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SEQUENCE 155 

CREF V01 



n 12 



.EOUAT 
.EOUIV 



.HEAOE 

.KT11 

.SETUP 

.SIZME 

.SWRHI 

.SWRLO 

.SACTT 

.SAPTB 

.SAPTH 

.SAPTY 

.SCATC 

.SCMTA 

.tOB20 

.SEOP 

.$ERRO 

.SPOyf 

.SREAD 

.SSAVE 

.SSCOP 

.STRAP 

.STYPB 

.STYPO 

.JTYPE 

.STYPO 



REFER^^CE 

REFERENCES 
#15-1276 
#15-1199 
#15-1188 
»'*2-2072 
#53-2347 
#63-2416 
#75-2768 
#98-3347 
98-3347 
#33-1838 
#33-1838 
#15-1199 
59-2385 
78-3144 
#15-1188 
#15-930 
#15-1199 
#1 5-1199 
#15-1208 
#15-1188 
#15-1188 
#15-1188 
#15-945 
#15-1188 
#15-1198 
#15-1189 
#16-1276 
#15-1191 
#15-1191 
#15-1189 
#15-1189 
#15-1192 
#15-1189 
#15-751 
#15-1190 
#15-1191 
#15-1192 
#15-500 
#15-1190 
#15-1191 
#15-1190 
#15-1189 
#15-1190 



16-1276 16-1276 16-1276 16-1276 16-1276 16-1276 



#15-1199 
#43-2083 
#54-2352 
#64-2421 
#76-2908 
98-3347 

98- 3347 
#33-1838 
#33-1838 

39-2022 
60-2390 

15-1199 
#15-1187 
#15-1199 
#15-1199 
#15-1209 
15-1197 
15-1200 
15-1272 
28-1689 

15- 1198 

#15-1274 

16- 1276 
#15-1275 
#92-3335 

15-1273 
15-1276 

97- 3345 

84- 3215 
#86-3219 

99- 3349 
89-3315 

#96-3343 

85- 3217 

98- 3347 
93-3337 
95-3341 
91-3333 

#94-3339 



#34-1866 
#44-2094 
#55-2357 
#65-2426 
#77-3052 
98-3347 
98-3347 



51-2333 
61-2395 



#15-1199 
#15-1199 
#15-1199 
#15-1210 



#35-1888 
#45-2114 
#56-2374 
#66-2431 
#79-3171 
98-3347 



52-2338 
62-2400 



#15-1199 
#15-1199 
#15-1199 
#15-1211 



#36-1913 
#46-2167 
#57-2379 
#67-2436 
#80-3176 
98-3347 



53-2343 
72-2643 



#15-1199 
#15-1199 
#15-1199 



#37-1953 
#47-2191 
#58-2384 
#68-2451 
#81-3183 
98-3347 



54-2348 
75-2744 



#15-1199 
#15-1199 
#15-1203 



#38-2002 
#48-2286 
#59-2389 
#69-2478 
#82-3197 
98-3347 



55-2353 
75-2746 



#15-1199 
#15-1199 
#15-1204 



#39-2039 
#50-2332 
#60-2394 
#70-2576 



#40-2050 
#51-:337 
#61-2399 
#71-2616 



98-3347 98-3347 



56-2358 
75-2752 



#15-1199 
#15-1199 
#15-1205 



57-2375 
76-2867 



#15-1199 
#15-1199 
#15-1206 



#41-2061 
#52-2342 
#62-2411 
#73-2674 

98-3347 



58-2380 
77-3004 



#15-1199 
#15-1199 
#15-1207 



